diff options
| author | Samer Masterson | 2015-01-16 05:35:51 +0300 |
|---|---|---|
| committer | Dmitry Gutov | 2015-01-16 05:35:51 +0300 |
| commit | dfa8729c1086d6461de846aad47f2a0aba732176 (patch) | |
| tree | cb70e2e7cfc0b1043dffefe37bd6cda3378c18d4 | |
| parent | b6b9d465cb81f5d35fb5c5432461ce7170759725 (diff) | |
| download | emacs-dfa8729c1086d6461de846aad47f2a0aba732176.tar.gz emacs-dfa8729c1086d6461de846aad47f2a0aba732176.zip | |
Parse pcomplete arguments regardless of pcomplete-cycle-completions
* pcomplete.el (pcomplete-parse-arguments): Parse arguments regardless
of pcomplete-cycle-completions's value.
Fixes: debbugs:18950
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/pcomplete.el | 3 |
2 files changed, 6 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 6aa0c129638..64c3305d4fe 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2015-01-16 Samer Masterson <samer@samertm.com> (tiny change) | ||
| 2 | |||
| 3 | * pcomplete.el (pcomplete-parse-arguments): Parse arguments | ||
| 4 | regardless of pcomplete-cycle-completions's value. (Bug#18950) | ||
| 5 | |||
| 1 | 2015-01-16 Lars Magne Ingebrigtsen <larsi@gnus.org> | 6 | 2015-01-16 Lars Magne Ingebrigtsen <larsi@gnus.org> |
| 2 | 7 | ||
| 3 | * dom.el (dom-strings): New function. | 8 | * dom.el (dom-strings): New function. |
diff --git a/lisp/pcomplete.el b/lisp/pcomplete.el index 17327ea5c95..7bcf2c1759e 100644 --- a/lisp/pcomplete.el +++ b/lisp/pcomplete.el | |||
| @@ -755,8 +755,7 @@ this is `comint-dynamic-complete-functions'." | |||
| 755 | pcomplete-index 0 | 755 | pcomplete-index 0 |
| 756 | pcomplete-stub (pcomplete-arg 'last)) | 756 | pcomplete-stub (pcomplete-arg 'last)) |
| 757 | (let ((begin (pcomplete-begin 'last))) | 757 | (let ((begin (pcomplete-begin 'last))) |
| 758 | (if (and pcomplete-cycle-completions | 758 | (if (and (listp pcomplete-stub) ;?? |
| 759 | (listp pcomplete-stub) ;?? | ||
| 760 | (not pcomplete-expand-only-p)) | 759 | (not pcomplete-expand-only-p)) |
| 761 | (let* ((completions pcomplete-stub) ;?? | 760 | (let* ((completions pcomplete-stub) ;?? |
| 762 | (common-stub (car completions)) | 761 | (common-stub (car completions)) |