aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorThien-Thi Nguyen2007-04-10 11:40:50 +0000
committerThien-Thi Nguyen2007-04-10 11:40:50 +0000
commitae8bf5abb809f4056086093416f954f912bd1a69 (patch)
tree3fe9592b3b80ca9e78f5db95912bc9b0eee453c5 /lisp
parent5acce4b775471a46914fb2012bfc6cb350bf9ce1 (diff)
downloademacs-ae8bf5abb809f4056086093416f954f912bd1a69.tar.gz
emacs-ae8bf5abb809f4056086093416f954f912bd1a69.zip
(tty-handle-args): Use %S to log ARGS.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/startup.el2
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a88de10da50..6ec8dd39a75 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
12007-04-10 Thien-Thi Nguyen <ttn@gnu.org>
2
3 * startup.el (tty-handle-args): Use %S to log ARGS.
4
12007-04-10 Glenn Morris <rgm@gnu.org> 52007-04-10 Glenn Morris <rgm@gnu.org>
2 6
3 * dframe.el (dframe-frame-mode): Do not set auto-show-mode, since 7 * dframe.el (dframe-frame-mode): Do not set auto-show-mode, since
diff --git a/lisp/startup.el b/lisp/startup.el
index 22f32d2b149..84dc4dca8d8 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -510,7 +510,7 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'."
510;; Handle the X-like command-line arguments "-fg", "-bg", "-name", etc. 510;; Handle the X-like command-line arguments "-fg", "-bg", "-name", etc.
511(defun tty-handle-args (args) 511(defun tty-handle-args (args)
512 (let (rest) 512 (let (rest)
513 (message "%s" args) 513 (message "%S" args)
514 (while (and args 514 (while (and args
515 (not (equal (car args) "--"))) 515 (not (equal (car args) "--")))
516 (let* ((argi (pop args)) 516 (let* ((argi (pop args))