diff options
| author | Gerd Moellmann | 2001-10-01 09:32:09 +0000 |
|---|---|---|
| committer | Gerd Moellmann | 2001-10-01 09:32:09 +0000 |
| commit | 62bfa68216e11bd049cb85b50cd6b2cfc16477f5 (patch) | |
| tree | 6b4aad02fe4e6a48c14a1670efdf504171e65abd | |
| parent | 6260538e9b9dad6d0b2f0d59e3d749cb19485ea6 (diff) | |
| download | emacs-62bfa68216e11bd049cb85b50cd6b2cfc16477f5.tar.gz emacs-62bfa68216e11bd049cb85b50cd6b2cfc16477f5.zip | |
(gs-set-ghostview-window-prop): Fix args of `elt'.
| -rw-r--r-- | lisp/ChangeLog | 2 | ||||
| -rw-r--r-- | lisp/gs.el | 8 |
2 files changed, 6 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 32d58d60c9a..11a429aefe6 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,7 @@ | |||
| 1 | 2001-10-01 Gerd Moellmann <gerd@gnu.org> | 1 | 2001-10-01 Gerd Moellmann <gerd@gnu.org> |
| 2 | 2 | ||
| 3 | * gs.el (gs-set-ghostview-window-prop): Fix args of `elt'. | ||
| 4 | |||
| 3 | * emacs-lisp/edebug.el (rx): Add def-edebug-spec. | 5 | * emacs-lisp/edebug.el (rx): Add def-edebug-spec. |
| 4 | 6 | ||
| 5 | * emacs-lisp/rx.el: New file. | 7 | * emacs-lisp/rx.el: New file. |
diff --git a/lisp/gs.el b/lisp/gs.el index 511bde6a474..d3bec85f141 100644 --- a/lisp/gs.el +++ b/lisp/gs.el | |||
| @@ -115,10 +115,10 @@ SPEC is a GS image specification. IMG-WIDTH is the width of the | |||
| 115 | requested image, and IMG-HEIGHT is the height of the requested | 115 | requested image, and IMG-HEIGHT is the height of the requested |
| 116 | image in pixels." | 116 | image in pixels." |
| 117 | (let* ((box (plist-get (cdr spec) :bounding-box)) | 117 | (let* ((box (plist-get (cdr spec) :bounding-box)) |
| 118 | (llx (elt 0 box)) | 118 | (llx (elt box 0)) |
| 119 | (lly (elt 1 box)) | 119 | (lly (elt box 1)) |
| 120 | (urx (elt 2 box)) | 120 | (urx (elt box 2)) |
| 121 | (ury (elt 3 box)) | 121 | (ury (elt box 3)) |
| 122 | (rotation (or (plist-get (cdr spec) :rotate) 0)) | 122 | (rotation (or (plist-get (cdr spec) :rotate) 0)) |
| 123 | ;; The pixel width IMG-WIDTH of the pixmap gives the | 123 | ;; The pixel width IMG-WIDTH of the pixmap gives the |
| 124 | ;; dots, URX - LLX give the inch. | 124 | ;; dots, URX - LLX give the inch. |