From ce3a988d18429158cda0f146042e974de0a14fd8 Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Thu, 4 Feb 2010 23:49:36 -0500 Subject: [PATCH] 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). --- lisp/ChangeLog | 5 +++++ lisp/startup.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e177ccd84f6..b6627e69ccc 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2010-02-05 Chong Yidong + + * startup.el (command-line-1): Convert options beginning with a + single dash as well (Bug#5519). + 2010-02-05 Stefan Monnier Make `initials' completion work for /hh -> /home/horn again (bug#5524). 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)) -- 2.39.2