(tty-handle-args): Use %S to log ARGS.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a88de10da50ff393aadec91c13b55a399da4133d..6ec8dd39a759e3da959e29a77034fa1159fbc63a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2007-04-10  Thien-Thi Nguyen  <ttn@gnu.org>
+
+       * startup.el (tty-handle-args): Use %S to log ARGS.
+
 2007-04-10  Glenn Morris  <rgm@gnu.org>
 
        * dframe.el (dframe-frame-mode): Do not set auto-show-mode, since

diff --git a/lisp/startup.el b/lisp/startup.el
index 22f32d2b1494f976a94fd38aca6a3a7dcbdecc67..84dc4dca8d88f07512cf8674e74ef961809c6db5 100644 (file)
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -510,7 +510,7 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'."
 ;; Handle the X-like command-line arguments "-fg", "-bg", "-name", etc.
 (defun tty-handle-args (args)
   (let (rest)
-    (message "%s" args)
+    (message "%S" args)
     (while (and args
                (not (equal (car args) "--")))
       (let* ((argi (pop args))