From: Karl Heuer <kwzh@gnu.org>
Date: Wed, 28 Sep 1994 22:38:04 +0000 (+0000)
Subject: (command-line): Fix bug in previous change.
X-Git-Tag: emacs-19.34~6680
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a981e7fff1b1db748ce271c5585a864425ac41b2;p=emacs.git

(command-line): Fix bug in previous change.
---

diff --git a/lisp/startup.el b/lisp/startup.el
index 2090e046308..e1a3bba5010 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -297,8 +297,8 @@ specified by the LC_ALL, LC_CTYPE and LANG environment variables.")
 	    (argi (car args))
 	    (argval nil))
 	(if (string-match "=" argi)
-	    (setq argi (substring argi 0 (1- (match-beginning 0)))
-		  argval (substring argi (match-end 0))))
+	    (setq argval (substring argi (match-end 0))
+		  argi (substring argi 0 (match-beginning 0))))
 	(let ((completion (try-completion argi longopts)))
 	  (if (eq completion t)
 	      (setq argi (substring argi 1))