summaryrefslogtreecommitdiff
path: root/lisp/startup.el
diff options
context:
space:
mode:
authorJuanma Barranquero <lekktu@gmail.com>2011-08-12 22:45:45 +0200
committerJuanma Barranquero <lekktu@gmail.com>2011-08-12 22:45:45 +0200
commit62f1ca498cf11a3fa9b707c115673ea7b298e957 (patch)
tree2613e5b732a9ad12f8059c64c4c9c5a1af280018 /lisp/startup.el
parent29dbb8f772081d2f325b894257f3062d6ea404c8 (diff)
downloademacs-62f1ca498cf11a3fa9b707c115673ea7b298e957.tar.gz
lisp/startup.el (argi): Declare as global variable (bug#9275).
Diffstat (limited to 'lisp/startup.el')
-rw-r--r--lisp/startup.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/startup.el b/lisp/startup.el
index 6953ed25ed4..0dee969fb5a 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -105,6 +105,11 @@ This is a convenience alias, so that one can write \(pop argv\)
inside of --eval command line arguments in order to access
following arguments.")
+(with-no-warnings
+ ;; FIXME: Bad name for a dynamically bound variable
+ (defvar argi nil
+ "Current command-line argument."))
+
(defvar command-line-functions nil ;; lrs 7/31/89
"List of functions to process unrecognized command-line arguments.
Each function should access the dynamically bound variables