commit: Remove some extra parentheses, #'set-face-background-pixmap-file.

changeset: 4670:5a54ce6dc945 tag: tip user: Aidan Kehoe <kehoea(a)parhasard.net&gt; date: Sun Aug 09 12:38:04 2009 +0100 files: lisp/ChangeLog lisp/faces.el description: Remove some extra parentheses, #'set-face-background-pixmap-file. lisp/ChangeLog addition: 2009-08-09 Aidan Kehoe <kehoea(a)parhasard.net&gt; * faces.el (set-face-background-pixmap-file): Remove some extra parentheses revealed by change set 7757334005ae. diff -r 2c1fa63dddbc -r 5a54ce6dc945 lisp/ChangeLog --- a/lisp/ChangeLog Tue Jul 28 23:29:22 2009 +0900 +++ b/lisp/ChangeLog Sun Aug 09 12:38:04 2009 +0100 ＠＠ -1,3 +1,8 ＠＠ +2009-08-09 Aidan Kehoe <kehoea(a)parhasard.net&gt; + + * faces.el (set-face-background-pixmap-file): + Remove some extra parentheses revealed by change set 7757334005ae. + 2009-07-28 Mike Sperber <mike(a)xemacs.org&gt; * startup.el (startup-setup-paths): Use `emacs-data-roots' instead diff -r 2c1fa63dddbc -r 5a54ce6dc945 lisp/faces.el --- a/lisp/faces.el Tue Jul 28 23:29:22 2009 +0900 +++ b/lisp/faces.el Sun Aug 09 12:38:04 2009 +0100 ＠＠ -706,8 +706,8 ＠＠ (interactive (let* ((face (read-face-name "Set background pixmap of face: ")) (default (and (face-background-pixmap-instance face) - ((image-instance-file-name - (face-background-pixmap-instance face))))) + (image-instance-file-name + (face-background-pixmap-instance face)))) (file (read-file-name (format "Set background pixmap of face %s to: " (symbol-name face)) _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches