summaryrefslogtreecommitdiff
path: root/lisp/gs.el
diff options
context:
space:
mode:
authorGerd Moellmann <gerd@gnu.org>2001-10-01 09:32:09 +0000
committerGerd Moellmann <gerd@gnu.org>2001-10-01 09:32:09 +0000
commit62bfa68216e11bd049cb85b50cd6b2cfc16477f5 (patch)
tree6b4aad02fe4e6a48c14a1670efdf504171e65abd /lisp/gs.el
parent6260538e9b9dad6d0b2f0d59e3d749cb19485ea6 (diff)
downloademacs-62bfa68216e11bd049cb85b50cd6b2cfc16477f5.tar.gz
(gs-set-ghostview-window-prop): Fix args of `elt'.
Diffstat (limited to 'lisp/gs.el')
-rw-r--r--lisp/gs.el8
1 files changed, 4 insertions, 4 deletions
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
requested image, and IMG-HEIGHT is the height of the requested
image in pixels."
(let* ((box (plist-get (cdr spec) :bounding-box))
- (llx (elt 0 box))
- (lly (elt 1 box))
- (urx (elt 2 box))
- (ury (elt 3 box))
+ (llx (elt box 0))
+ (lly (elt box 1))
+ (urx (elt box 2))
+ (ury (elt box 3))
(rotation (or (plist-get (cdr spec) :rotate) 0))
;; The pixel width IMG-WIDTH of the pixmap gives the
;; dots, URX - LLX give the inch.