summaryrefslogtreecommitdiff
path: root/lisp/term/x-win.el
diff options
context:
space:
mode:
authorSam Steingold <sds@gnu.org>2011-02-01 16:37:12 -0500
committerSam Steingold <sds@gnu.org>2011-02-01 16:37:12 -0500
commite8e4d5c88e04390481b3156c0e5efe40979d8519 (patch)
tree91e183a5d20a036e1e03c544e693adfa8b09ec73 /lisp/term/x-win.el
parentabef340a0c5304054a2a5e6d95e1d825501f0e7a (diff)
downloademacs-e8e4d5c88e04390481b3156c0e5efe40979d8519.tar.gz
undo 2011-02-01T18:15:18Z!sds@gnu.org (purecopy-cons, purecopy-car) at Stefan Monnier's request
Diffstat (limited to 'lisp/term/x-win.el')
-rw-r--r--lisp/term/x-win.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el
index c966fc561cb..1ec80d5c277 100644
--- a/lisp/term/x-win.el
+++ b/lisp/term/x-win.el
@@ -1447,7 +1447,8 @@ Request data types in the order specified by `x-select-request-type'."
(define-key special-event-map [drag-n-drop] 'x-dnd-handle-drag-n-drop-event)
(defcustom x-gtk-stock-map
- (mapcar 'purecopy-cons
+ (mapcar (lambda (arg)
+ (cons (purecopy (car arg)) (purecopy (cdr arg))))
'(
("etc/images/new" . "gtk-new")
("etc/images/open" . "gtk-open")