(x-handle-switch): Fix handling of x-invocation-args for switches with

arguments.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index bd29cd50c2991385d08795fc052ccaa111591bd5..7a42bad04d10f4092ebad638cb6e8b33980b01aa 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2002-06-12  Juanma Barranquero  <lektu@terra>
+
+       * term/w32-win.el (x-handle-switch): Fix handling of
+       x-invocation-args for switches with arguments.
+
 2002-06-12  Richard M. Stallman  <rms@gnu.org>
 
        * info.el (Info-fontify-node): Compute header line specially

diff --git a/lisp/term/w32-win.el b/lisp/term/w32-win.el
index 89093f894d3bb5abb784039e9bda11edea819016..657ab67ee46938e804b50441741ef858a2cf2831 100644 (file)
--- a/lisp/term/w32-win.el
+++ b/lisp/term/w32-win.el
@@ -148,8 +148,8 @@ the last file dropped is selected."
            (setq default-frame-alist
                  (cons (cons param
                              (car x-invocation-args))
-                       default-frame-alist))
-           x-invocation-args (cdr x-invocation-args))))))
+                       default-frame-alist)
+                 x-invocation-args (cdr x-invocation-args)))))))
 
 (defun x-handle-numeric-switch (switch)
   "Handle SWITCH of the form \"-switch n\"."