diff options
| author | Chong Yidong <cyd@stupidchicken.com> | 2010-02-04 23:49:36 -0500 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2010-02-04 23:49:36 -0500 |
| commit | ce3a988d18429158cda0f146042e974de0a14fd8 (patch) | |
| tree | ad440cf8e920f44c4f5c0929cb9813d2f72fb4ff /lisp/startup.el | |
| parent | 51b23c448632f4947fb0e364b8f7d35b90c04e39 (diff) | |
| download | emacs-ce3a988d18429158cda0f146042e974de0a14fd8.tar.gz | |
Fix 2009-02-20 change to startup.el (Bug#5519).
* startup.el (command-line-1): Convert options beginning with a single dash as well (Bug#5519).
Diffstat (limited to 'lisp/startup.el')
| -rw-r--r-- | lisp/startup.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/startup.el b/lisp/startup.el index 857ad97e448..129eb2e6093 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -2103,7 +2103,7 @@ A fancy display is used on graphic displays, normal otherwise." (when (string-match "\\`\\(--[^=]*\\)=" argi) (setq argval (substring argi (match-end 0)) argi (match-string 1 argi))) - (when (string-match "\\`--." orig-argi) + (when (string-match "\\`--?[^-]" orig-argi) (setq completion (try-completion argi longopts)) (if (eq completion t) (setq argi (substring argi 1)) |