changeset:   5391:aa2705c83c24
user:        Aidan Kehoe <kehoea(a)parhasard.net>
date:        Mon Jan 10 17:55:06 2011 +0000
files:       lisp/ChangeLog lisp/dialog.el
description:
Correct a misplaced parenthesis in #'make-dialog-box, thank you Mats!
2011-01-10  Aidan Kehoe  <kehoea(a)parhasard.net>
	* dialog.el (make-dialog-box): Correct a misplaced parenthesis
	here, thank you Mats Lidell in 87zkr9gqrh.fsf(a)mail.contactor.se !
diff -r 1dbc93b7ba19 -r aa2705c83c24 lisp/ChangeLog
--- a/lisp/ChangeLog	Sun Jan 02 18:05:05 2011 +0000
+++ b/lisp/ChangeLog	Mon Jan 10 17:55:06 2011 +0000
@@ -1,3 +1,8 @@
+2011-01-10  Aidan Kehoe  <kehoea(a)parhasard.net>
+
+	* dialog.el (make-dialog-box): Correct a misplaced parenthesis
+	here, thank you Mats Lidell in 87zkr9gqrh.fsf(a)mail.contactor.se !
+
 2011-01-02  Aidan Kehoe  <kehoea(a)parhasard.net>
 
 	* dialog.el (make-dialog-box):
diff -r 1dbc93b7ba19 -r aa2705c83c24 lisp/dialog.el
--- a/lisp/dialog.el	Sun Jan 02 18:05:05 2011 +0000
+++ b/lisp/dialog.el	Mon Jan 10 17:55:06 2011 +0000
@@ -663,9 +663,9 @@
        (remf rest :modal)
        (if modal
            (dialog-box-modal-loop `(make-dialog-box-internal ',type ',rest))
-         (make-dialog-box-internal type rest))))
-    (t
-     (make-dialog-box-internal type rest))))
+         (make-dialog-box-internal type rest)))
+      (t
+       (make-dialog-box-internal type rest)))))
 
 (defun dialog-box-finish (result)
   "Exit a modal dialog box, returning RESULT.
_______________________________________________
XEmacs-Patches mailing list
XEmacs-Patches(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-patches