diff options
| author | Andreas Politz <politza@hochschule-trier.de> | 2017-03-01 08:12:09 +0100 |
|---|---|---|
| committer | Andreas Politz <politza@hochschule-trier.de> | 2017-03-01 08:12:09 +0100 |
| commit | 7cca03bd2fc534a6b42eafc2afef20099bf83dbf (patch) | |
| tree | 2fa03f6b6f2eca89a3cdc1f2389199fad988fa79 /lisp/pdf-virtual.el | |
| parent | 3a32d2420cc40ed864215f75aae4f6d868dc1cd2 (diff) | |
Delete trailing whitespace
Diffstat (limited to 'lisp/pdf-virtual.el')
| -rw-r--r-- | lisp/pdf-virtual.el | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/lisp/pdf-virtual.el b/lisp/pdf-virtual.el index 5db8162..40b0271 100644 --- a/lisp/pdf-virtual.el +++ b/lisp/pdf-virtual.el @@ -28,7 +28,7 @@ ;; ;; The trickiest part is to make theses intermediate functions behave ;; like the pdf-info-* equivalents in both the synchronous and -;; asynchronous case. +;; asynchronous case. ;;; Code: (eval-when-compile @@ -316,7 +316,7 @@ ranges corresponding to PAGES. Each element has the form \(FILENAME \(FILE-FIRT-PAGE . FILE-LAST-PAGE\) REGION\) . " - + (let ((begin (car pages)) (end (cdr pages))) (unless (<= begin end) @@ -328,7 +328,7 @@ ranges corresponding to PAGES. Each element has the form (signal 'args-out-of-range (list 'pages pages))) (while (<= begin end) (let* ((page (aref arr (1- begin))) - (filename (pdf-virtual-range-filename page)) + (filename (pdf-virtual-range-filename page)) (offset (- (1- begin) (pdf-virtual-range-index-start page))) (first (+ (pdf-virtual-range-first page) @@ -337,7 +337,7 @@ ranges corresponding to PAGES. Each element has the form (pdf-virtual-range-last page))) (region (pdf-virtual-range-region page))) (push `(,filename (,first . ,last) ,region) result) - (cl-incf begin (1+ (- last first))))) + (cl-incf begin (1+ (- last first))))) (nreverse result)))) (pdf-virtual-document-defun number-of-pages (doc) @@ -435,7 +435,7 @@ PAGE should be a page-number." (pdf-virtual-range-filename other))))))) (when page (1+ (pdf-virtual-range-index-start page))))) - + ;; * ================================================================== * ;; * Modes @@ -449,7 +449,7 @@ PAGE should be a page-number." ;;;###autoload -(define-derived-mode pdf-virtual-edit-mode emacs-lisp-mode "VPDF-Edit" +(define-derived-mode pdf-virtual-edit-mode emacs-lisp-mode "VPDF-Edit" "Major mode when editing a virtual PDF buffer." (buffer-enable-undo) (setq-local buffer-read-only nil) @@ -539,7 +539,7 @@ PAGE should be a page-number." (with-current-buffer (generate-new-buffer buffer-name) (insert ";; %VPDF 1.0\n\n") (insert ";; File Format -;; +;; ;; FORMAT ::= ( FILES* ) ;; FILES ::= ( FILE . PAGE-SPEC* ) ;; PAGE-SPEC ::= PAGE | ( PAGE . REGION ) @@ -602,7 +602,7 @@ PAGE should be a page-number." pdf-virtual-document)) (page (aref pages (1- pn))) (first-filepage (1+ (pdf-virtual-range-index-start page)))) - + (when (and (< n 0) (not (= first-filepage pn))) (cl-incf n)) |
