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-cache.el | |
| parent | 3a32d2420cc40ed864215f75aae4f6d868dc1cd2 (diff) | |
Delete trailing whitespace
Diffstat (limited to 'lisp/pdf-cache.el')
| -rw-r--r-- | lisp/pdf-cache.el | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/lisp/pdf-cache.el b/lisp/pdf-cache.el index 7370773..84b9740 100644 --- a/lisp/pdf-cache.el +++ b/lisp/pdf-cache.el @@ -19,9 +19,9 @@ ;; along with this program. If not, see <http://www.gnu.org/licenses/>. ;;; Commentary: -;; +;; ;;; Code: -;; +;; (require 'pdf-info) (require 'pdf-util) @@ -108,7 +108,7 @@ is nil and VALUE undefined." (when pdf-cache--data (dolist (page pages) (remhash page pdf-cache--data)))) - + (defun pdf-cache-clear-data () (interactive) (when pdf-cache--data @@ -149,7 +149,7 @@ Make sure, not to modify it's return value." command))) (define-pdf-cache-function boundingbox t) (define-pdf-cache-function textregions t) (define-pdf-cache-function pagesize t) - + ;; * ================================================================== * ;; * PNG image LRU cache @@ -157,7 +157,7 @@ Make sure, not to modify it's return value." command))) (defvar pdf-cache-image-inihibit nil "Non-nil, if the image cache should be bypassed.") - + (defvar-local pdf-cache--image-cache nil) (defmacro pdf-cache--make-image (page width data hash) @@ -197,7 +197,7 @@ Does not modify the cache. See also `pdf-cache-get-image'." (apply 'pdf-cache--image-match image spec)))))) (and image (pdf-cache--image/data image)))) - + (defun pdf-cache-get-image (page min-width &optional max-width hash) "Return PAGE's PNG data as a string. @@ -214,7 +214,7 @@ Returns nil, if no matching image was found." (while (and (cdr cache) (not (pdf-cache--image-match (car (cdr cache)) - page min-width max-width hash))) + page min-width max-width hash))) (setq cache (cdr cache))) (setq image (cadr cache)) (when (car cache) @@ -447,7 +447,7 @@ Used solely in `pdf-cache--prefetch-start'.") (defun pdf-cache--prefetch-stop () "Stop prefetching images in current buffer." (setq pdf-cache--prefetch-pages nil)) - + (defun pdf-cache--prefetch-cancel () "Cancel prefetching images in current buffer." (pdf-cache--prefetch-stop) |
