GNU bug report logs - #23117
25.0.92; Having pcomplete-ignore-case different from completion-ignore-case can lead to an error

Previous Next

To add a comment to this bug, you must first unarchive it, by sending
a message to control AT debbugs.gnu.org, with unarchive 23117 in the body.
You can then email your comments to 23117 AT debbugs.gnu.org in the normal way.

Toggle the display of automated, internal messages from the tracker.

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: Dmitry Gutov <dgutov <at> yandex.ru>
To: bug-gnu-emacs <at> gnu.org
Subject: 25.0.92;
 Having pcomplete-ignore-case different from completion-ignore-case
 can lead to an error
Date: Sat, 26 Mar 2016 02:21:51 +0200

1. (setq pcomplete-ignore-case t)
2. Keep completion-ignore-case at its default nil value.
3. M-x shell
3. Type 'cd /Usr/', press C-M-i.
4. See the below error.

Should the former variable just be made into an alias for the latter one?

Debugger entered--Lisp error: (error "Internal error: usr/games/ doesn’t match \\`Usr\\(.*?\\)/")
  signal(error ("Internal error: usr/games/ doesn’t match \\`Usr\\(.*?\\)/"))
  error("Internal error: %s doesn't match %s" "usr/games/" "\\`Usr\\(.*?\\)/")
  completion-pcm--merge-completions(("usr/games/" "usr/./" "usr/lib/" "usr/local/" "usr/../" "usr/bin/" "usr/share/" "usr/X11R6/" "usr/src/" "usr/locale/" "usr/include/" "usr/lib32/" "usr/sbin/") (#("Usr" 0 3 (fontified t)) any "/"))
  completion-pcm--merge-try((#("Usr" 0 3 (fontified t)) any "/") ("usr/games/" "usr/./" "usr/lib/" "usr/local/" "usr/../" "usr/bin/" "usr/share/" "usr/X11R6/" "usr/src/" "usr/locale/" "usr/include/" "usr/lib32/" "usr/sbin/") #("/" 0 1 (fontified t)) "")
  completion-pcm-try-completion(#("/Usr/" 0 5 (fontified t)) #[771 "\302.G\303	.\"\203).\304\305\224O.B\262.\306\307\310.\"!.B\262.\305\225\302O\262.\202..\203:.\311=\204O.\242\312=\204O.\313\314..B\237\315#\316.\300.$\262.\202\307.\317\320\321\322.\"\"\313\314..B\237\315#\323.\300..\243\206k.\315$\211@.Y\203\223.\311=\203\204.\316.\300.\n$\202\305.\312.@.GZ\\.ABB\202\305.\311=\203\272.\316.\300.\n$.@Z\321\324\325\326\327\330.!\331\"\332\333%.\"\266\202\202\305.\312..GZ\\.ABB\266\203\207" [#[771 "\211\305=\203.	\203.\305\306\307B\310..#ABB\207\311\n.\312\313\300\314...&.*\207" [file-directory-p pcomplete-compare-entry-function pcomplete-ignore-case completion-ignore-case completion-ignored-extensions metadata cycle-sort-function #[257 "\301.\"\207" [pcomplete-compare-entry-function sort] 4 "\n\n(fn COMPS)"] completion-file-name-table nil completion-table-with-predicate comint-completion-file-name-table strict] 10 "\n\n(fn S P A)"] pcomplete--env-regexp nil string-match 0 1 getenv match-string 2 t boundaries mapconcat identity "" complete-with-action apply + mapcar length completion-boundaries make-byte-code 257 "\211\300\301O\207" vconcat vector [nil] 4 "\n\n(fn S)"] 17 "\n\n(fn STRING PRED ACTION)"] nil 5)
  #[257 "\300.
\2368\301\242\302\242\303\304\242$\207" [1 (#("/Usr/" 0 5 (fontified t))) (#[771 "\302.G\303	.\"\203).\304\305\224O.B\262.\306\307\310.\"!.B\262.\305\225\302O\262.\202..\203:.\311=\204O.\242\312=\204O.\313\314..B\237\315#\316.\300.$\262.\202\307.\317\320\321\322.\"\"\313\314..B\237\315#\323.\300..\243\206k.\315$\211@.Y\203\223.\311=\203\204.\316.\300.\n$\202\305.\312.@.GZ\\.ABB\202\305.\311=\203\272.\316.\300.\n$.@Z\321\324\325\326\327\330.!\331\"\332\333%.\"\266\202\202\305.\312..GZ\\.ABB\266\203\207" [#[771 "\211\305=\203.	\203.\305\306\307B\310..#ABB\207\311\n.\312\313\300\314...&.*\207" [file-directory-p pcomplete-compare-entry-function pcomplete-ignore-case completion-ignore-case completion-ignored-extensions metadata cycle-sort-function #[257 "\301.\"\207" [pcomplete-compare-entry-function sort] 4 "\n\n(fn COMPS)"] completion-file-name-table nil completion-table-with-predicate comint-completion-file-name-table strict] 10 "\n\n(fn S P A)"] pcomplete--env-regexp nil string-match 0 1 getenv match-string 2 t boundaries mapconcat identity "" complete-with-action apply + mapcar length completion-boundaries make-byte-code 257 "\211\300\301O\207" vconcat vector [nil] 4 "\n\n(fn S)"] 17 "\n\n(fn STRING PRED ACTION)"]) nil (5) completion-styles-alist] 6 "\n\n(fn STYLE)"](partial-completion)
  completion--some(#[257 "\300.
\2368\301\242\302\242\303\304\242$\207" [1 (#("/Usr/" 0 5 (fontified t))) (#[771 "\302.G\303	.\"\203).\304\305\224O.B\262.\306\307\310.\"!.B\262.\305\225\302O\262.\202..\203:.\311=\204O.\242\312=\204O.\313\314..B\237\315#\316.\300.$\262.\202\307.\317\320\321\322.\"\"\313\314..B\237\315#\323.\300..\243\206k.\315$\211@.Y\203\223.\311=\203\204.\316.\300.\n$\202\305.\312.@.GZ\\.ABB\202\305.\311=\203\272.\316.\300.\n$.@Z\321\324\325\326\327\330.!\331\"\332\333%.\"\266\202\202\305.\312..GZ\\.ABB\266\203\207" [#[771 "\211\305=\203.	\203.\305\306\307B\310..#ABB\207\311\n.\312\313\300\314...&.*\207" [file-directory-p pcomplete-compare-entry-function pcomplete-ignore-case completion-ignore-case completion-ignored-extensions metadata cycle-sort-function #[257 "\301.\"\207" [pcomplete-compare-entry-function sort] 4 "\n\n(fn COMPS)"] completion-file-name-table nil completion-table-with-predicate comint-completion-file-name-table strict] 10 "\n\n(fn S P A)"] pcomplete--env-regexp nil string-match 0 1 getenv match-string 2 t boundaries mapconcat identity "" complete-with-action apply + mapcar length completion-boundaries make-byte-code 257 "\211\300\301O\207" vconcat vector [nil] 4 "\n\n(fn S)"] 17 "\n\n(fn STRING PRED ACTION)"]) nil (5) completion-styles-alist] 6 "\n\n(fn STYLE)"] (basic partial-completion emacs22))
  completion--nth-completion(1 #("/Usr/" 0 5 (fontified t)) #[771 "\301?.\303.\300.$)\207" [#[771 "\211\303=\203.\304\305.\300.#\306\"\207\211\307=\203.\301.!\310.\300.#\207\211\242\311=\203.\301.!.A\211G\312U\2035.
\202:.\301.P!\313.\"\204E.\314\315!\210\316.G\316O\317.\300.	.$\302.@.\n\"@.A\312U\203d.\312\202y.
A.G\\\302.\f.	P\"@.GZ\262.\311.BB\207\211\316=\203\241.\301.!\320.\300.#\211;\204\226.\211\202\240.\321..\312\301\302&.@\207\211\322=\203\317.\301.!\323.\300.#\317.\300.\324$@\325...\301\302&.\326.!\211:\203\315.\211\316\241\210.\207\211\327=\205).
\301.!\301.\312.O!\313.\"\203\353.\211G\202.
\301..\316O!\330.\"\203.
.G.GZ\202.
.G.G^.G.GZ\312]\\\331\245\262.\300.\332\333\334\335\336\301\302..
$\337\"\340\341%F\266\204\207" [#[771 "\302.G\303	.\"\203).\304\305\224O.B\262.\306\307\310.\"!.B\262.\305\225\302O\262.\202..\203:.\311=\204O.\242\312=\204O.\313\314..B\237\315#\316.\300.$\262.\202\307.\317\320\321\322.\"\"\313\314..B\237\315#\323.\300..\243\206k.\315$\211@.Y\203\223.\311=\203\204.\316.\300.\n$\202\305.\312.@.GZ\\.ABB\202\305.\311=\203\272.\316.\300.\n$.@Z\321\324\325\326\327\330.!\331\"\332\333%.\"\266\202\202\305.\312..GZ\\.ABB\266\203\207" [#[771 "\211\305=\203.	\203.\305\306\307B\310..#ABB\207\311\n.\312\313\300\314...&.*\207" [file-directory-p pcomplete-compare-entry-function pcomplete-ignore-case completion-ignore-case completion-ignored-extensions metadata cycle-sort-function #[257 "\301.\"\207" [pcomplete-compare-entry-function sort] 4 "\n\n(fn COMPS)"] completion-file-name-table nil completion-table-with-predicate comint-completion-file-name-table strict] 10 "\n\n(fn S P A)"] pcomplete--env-regexp nil string-match 0 1 getenv match-string 2 t boundaries mapconcat identity "" complete-with-action apply + mapcar length completion-boundaries make-byte-code 257 "\211\300\301O\207" vconcat vector [nil] 4 "\n\n(fn S)"] 17 "\n\n(fn STRING PRED ACTION)"] comint--unquote-argument comint--requote-argument metadata append completion-metadata ((completion--unquote-requote . t)) lambda test-completion boundaries 0 string-prefix-p cl--assertion-failed (string-prefix-p ustring ufull) nil completion-boundaries try-completion completion--twq-try t all-completions "" completion--twq-all last completion--unquote string-suffix-p 2 make-byte-code 514 "\211\304=\203..\242;\204..\207\305\302\303.@.A\300\301&.\207\211\306=\203<.\307.!\211A\206).\310.\205;.
\311\241\210\312\302\303..\300\301&.\207\311\207" vconcat vector [1 completion--twq-try 2 last 0 nil completion--twq-all] 11 "\n\n(fn UNQUOTED-RESULT OP)"] 19 "\n\n(fn STRING PRED ACTION)"] nil completion-ignore-case complete-with-action] 8 "\n\n(fn STRING PRED ACTION)"] nil 5 (metadata (cycle-sort-function . #[257 "\301.\"\207" [pcomplete-compare-entry-function sort] 4 "\n\n(fn COMPS)"]) (category . file) (completion--unquote-requote . t)))
  completion-try-completion(#("/Usr/" 0 5 (fontified t)) #[771 "\301?.\303.\300.$)\207" [#[771 "\211\303=\203.\304\305.\300.#\306\"\207\211\307=\203.\301.!\310.\300.#\207\211\242\311=\203.\301.!.A\211G\312U\2035.
\202:.\301.P!\313.\"\204E.\314\315!\210\316.G\316O\317.\300.	.$\302.@.\n\"@.A\312U\203d.\312\202y.
A.G\\\302.\f.	P\"@.GZ\262.\311.BB\207\211\316=\203\241.\301.!\320.\300.#\211;\204\226.\211\202\240.\321..\312\301\302&.@\207\211\322=\203\317.\301.!\323.\300.#\317.\300.\324$@\325...\301\302&.\326.!\211:\203\315.\211\316\241\210.\207\211\327=\205).
\301.!\301.\312.O!\313.\"\203\353.\211G\202.
\301..\316O!\330.\"\203.
.G.GZ\202.
.G.G^.G.GZ\312]\\\331\245\262.\300.\332\333\334\335\336\301\302..
$\337\"\340\341%F\266\204\207" [#[771 "\302.G\303	.\"\203).\304\305\224O.B\262.\306\307\310.\"!.B\262.\305\225\302O\262.\202..\203:.\311=\204O.\242\312=\204O.\313\314..B\237\315#\316.\300.$\262.\202\307.\317\320\321\322.\"\"\313\314..B\237\315#\323.\300..\243\206k.\315$\211@.Y\203\223.\311=\203\204.\316.\300.\n$\202\305.\312.@.GZ\\.ABB\202\305.\311=\203\272.\316.\300.\n$.@Z\321\324\325\326\327\330.!\331\"\332\333%.\"\266\202\202\305.\312..GZ\\.ABB\266\203\207" [#[771 "\211\305=\203.	\203.\305\306\307B\310..#ABB\207\311\n.\312\313\300\314...&.*\207" [file-directory-p pcomplete-compare-entry-function pcomplete-ignore-case completion-ignore-case completion-ignored-extensions metadata cycle-sort-function #[257 "\301.\"\207" [pcomplete-compare-entry-function sort] 4 "\n\n(fn COMPS)"] completion-file-name-table nil completion-table-with-predicate comint-completion-file-name-table strict] 10 "\n\n(fn S P A)"] pcomplete--env-regexp nil string-match 0 1 getenv match-string 2 t boundaries mapconcat identity "" complete-with-action apply + mapcar length completion-boundaries make-byte-code 257 "\211\300\301O\207" vconcat vector [nil] 4 "\n\n(fn S)"] 17 "\n\n(fn STRING PRED ACTION)"] comint--unquote-argument comint--requote-argument metadata append completion-metadata ((completion--unquote-requote . t)) lambda test-completion boundaries 0 string-prefix-p cl--assertion-failed (string-prefix-p ustring ufull) nil completion-boundaries try-completion completion--twq-try t all-completions "" completion--twq-all last completion--unquote string-suffix-p 2 make-byte-code 514 "\211\304=\203..\242;\204..\207\305\302\303.@.A\300\301&.\207\211\306=\203<.\307.!\211A\206).\310.\205;.
\311\241\210\312\302\303..\300\301&.\207\311\207" vconcat vector [1 completion--twq-try 2 last 0 nil completion--twq-all] 11 "\n\n(fn UNQUOTED-RESULT OP)"] 19 "\n\n(fn STRING PRED ACTION)"] nil completion-ignore-case complete-with-action] 8 "\n\n(fn STRING PRED ACTION)"] nil 5 (metadata (cycle-sort-function . #[257 "\301.\"\207" [pcomplete-compare-entry-function sort] 4 "\n\n(fn COMPS)"]) (category . file) (completion--unquote-requote . t)))
  completion--do-completion(#<marker at 26 in *shell*> 31)
  completion--in-region-1(#<marker at 26 in *shell*> 31)
  #[1028 ".
.\n\203!.\304.!\203..\202.\305.!\305.\306\".F.\307\310!\210\311.\"*\207" [minibuffer-completion-predicate minibuffer-completion-table completion-in-region-mode-predicate completion-in-region--data markerp copy-marker t completion-in-region-mode 1 completion--in-region-1] 8 "\n\n(fn START END COLLECTION PREDICATE)"](#<marker at 26 in *shell*> 31 #[771 "\301?.\303.\300.$)\207" [#[771 "\211\303=\203.\304\305.\300.#\306\"\207\211\307=\203.\301.!\310.\300.#\207\211\242\311=\203.\301.!.A\211G\312U\2035.
\202:.\301.P!\313.\"\204E.\314\315!\210\316.G\316O\317.\300.	.$\302.@.\n\"@.A\312U\203d.\312\202y.
A.G\\\302.\f.	P\"@.GZ\262.\311.BB\207\211\316=\203\241.\301.!\320.\300.#\211;\204\226.\211\202\240.\321..\312\301\302&.@\207\211\322=\203\317.\301.!\323.\300.#\317.\300.\324$@\325...\301\302&.\326.!\211:\203\315.\211\316\241\210.\207\211\327=\205).
\301.!\301.\312.O!\313.\"\203\353.\211G\202.
\301..\316O!\330.\"\203.
.G.GZ\202.
.G.G^.G.GZ\312]\\\331\245\262.\300.\332\333\334\335\336\301\302..
$\337\"\340\341%F\266\204\207" [#[771 "\302.G\303	.\"\203).\304\305\224O.B\262.\306\307\310.\"!.B\262.\305\225\302O\262.\202..\203:.\311=\204O.\242\312=\204O.\313\314..B\237\315#\316.\300.$\262.\202\307.\317\320\321\322.\"\"\313\314..B\237\315#\323.\300..\243\206k.\315$\211@.Y\203\223.\311=\203\204.\316.\300.\n$\202\305.\312.@.GZ\\.ABB\202\305.\311=\203\272.\316.\300.\n$.@Z\321\324\325\326\327\330.!\331\"\332\333%.\"\266\202\202\305.\312..GZ\\.ABB\266\203\207" [#[771 "\211\305=\203.	\203.\305\306\307B\310..#ABB\207\311\n.\312\313\300\314...&.*\207" [file-directory-p pcomplete-compare-entry-function pcomplete-ignore-case completion-ignore-case completion-ignored-extensions metadata cycle-sort-function #[257 "\301.\"\207" [pcomplete-compare-entry-function sort] 4 "\n\n(fn COMPS)"] completion-file-name-table nil completion-table-with-predicate comint-completion-file-name-table strict] 10 "\n\n(fn S P A)"] pcomplete--env-regexp nil string-match 0 1 getenv match-string 2 t boundaries mapconcat identity "" complete-with-action apply + mapcar length completion-boundaries make-byte-code 257 "\211\300\301O\207" vconcat vector [nil] 4 "\n\n(fn S)"] 17 "\n\n(fn STRING PRED ACTION)"] comint--unquote-argument comint--requote-argument metadata append completion-metadata ((completion--unquote-requote . t)) lambda test-completion boundaries 0 string-prefix-p cl--assertion-failed (string-prefix-p ustring ufull) nil completion-boundaries try-completion completion--twq-try t all-completions "" completion--twq-all last completion--unquote string-suffix-p 2 make-byte-code 514 "\211\304=\203..\242;\204..\207\305\302\303.@.A\300\301&.\207\211\306=\203<.\307.!\211A\206).\310.\205;.
\311\241\210\312\302\303..\300\301&.\207\311\207" vconcat vector [1 completion--twq-try 2 last 0 nil completion--twq-all] 11 "\n\n(fn UNQUOTED-RESULT OP)"] 19 "\n\n(fn STRING PRED ACTION)"] nil completion-ignore-case complete-with-action] 8 "\n\n(fn STRING PRED ACTION)"] nil)
  apply(#[1028 ".
.\n\203!.\304.!\203..\202.\305.!\305.\306\".F.\307\310!\210\311.\"*\207" [minibuffer-completion-predicate minibuffer-completion-table completion-in-region-mode-predicate completion-in-region--data markerp copy-marker t completion-in-region-mode 1 completion--in-region-1] 8 "\n\n(fn START END COLLECTION PREDICATE)"] (#<marker at 26 in *shell*> 31 #[771 "\301?.\303.\300.$)\207" [#[771 "\211\303=\203.\304\305.\300.#\306\"\207\211\307=\203.\301.!\310.\300.#\207\211\242\311=\203.\301.!.A\211G\312U\2035.
\202:.\301.P!\313.\"\204E.\314\315!\210\316.G\316O\317.\300.	.$\302.@.\n\"@.A\312U\203d.\312\202y.
A.G\\\302.\f.	P\"@.GZ\262.\311.BB\207\211\316=\203\241.\301.!\320.\300.#\211;\204\226.\211\202\240.\321..\312\301\302&.@\207\211\322=\203\317.\301.!\323.\300.#\317.\300.\324$@\325...\301\302&.\326.!\211:\203\315.\211\316\241\210.\207\211\327=\205).
\301.!\301.\312.O!\313.\"\203\353.\211G\202.
\301..\316O!\330.\"\203.
.G.GZ\202.
.G.G^.G.GZ\312]\\\331\245\262.\300.\332\333\334\335\336\301\302..
$\337\"\340\341%F\266\204\207" [#[771 "\302.G\303	.\"\203).\304\305\224O.B\262.\306\307\310.\"!.B\262.\305\225\302O\262.\202..\203:.\311=\204O.\242\312=\204O.\313\314..B\237\315#\316.\300.$\262.\202\307.\317\320\321\322.\"\"\313\314..B\237\315#\323.\300..\243\206k.\315$\211@.Y\203\223.\311=\203\204.\316.\300.\n$\202\305.\312.@.GZ\\.ABB\202\305.\311=\203\272.\316.\300.\n$.@Z\321\324\325\326\327\330.!\331\"\332\333%.\"\266\202\202\305.\312..GZ\\.ABB\266\203\207" [#[771 "\211\305=\203.	\203.\305\306\307B\310..#ABB\207\311\n.\312\313\300\314...&.*\207" [file-directory-p pcomplete-compare-entry-function pcomplete-ignore-case completion-ignore-case completion-ignored-extensions metadata cycle-sort-function #[257 "\301.\"\207" [pcomplete-compare-entry-function sort] 4 "\n\n(fn COMPS)"] completion-file-name-table nil completion-table-with-predicate comint-completion-file-name-table strict] 10 "\n\n(fn S P A)"] pcomplete--env-regexp nil string-match 0 1 getenv match-string 2 t boundaries mapconcat identity "" complete-with-action apply + mapcar length completion-boundaries make-byte-code 257 "\211\300\301O\207" vconcat vector [nil] 4 "\n\n(fn S)"] 17 "\n\n(fn STRING PRED ACTION)"] comint--unquote-argument comint--requote-argument metadata append completion-metadata ((completion--unquote-requote . t)) lambda test-completion boundaries 0 string-prefix-p cl--assertion-failed (string-prefix-p ustring ufull) nil completion-boundaries try-completion completion--twq-try t all-completions "" completion--twq-all last completion--unquote string-suffix-p 2 make-byte-code 514 "\211\304=\203..\242;\204..\207\305\302\303.@.A\300\301&.\207\211\306=\203<.\307.!\211A\206).\310.\205;.
\311\241\210\312\302\303..\300\301&.\207\311\207" vconcat vector [1 completion--twq-try 2 last 0 nil completion--twq-all] 11 "\n\n(fn UNQUOTED-RESULT OP)"] 19 "\n\n(fn STRING PRED ACTION)"] nil completion-ignore-case complete-with-action] 8 "\n\n(fn STRING PRED ACTION)"] nil))
  #[771 ".:\2030.@\301=\203.\300\242\302.A\"\303.#\207\304.@\305\306\307\310\311\312\300!\313\"\314\315%.A.#.#\207\304\316.\"\207" [(#0) t append nil apply apply-partially make-byte-code 642 "\300\242..#\207" vconcat vector [] 7 "\n\n(fn FUNS GLOBAL &rest ARGS)" #[1028 ".
.\n\203!.\304.!\203..\202.\305.!\305.\306\".F.\307\310!\210\311.\"*\207" [minibuffer-completion-predicate minibuffer-completion-table completion-in-region-mode-predicate completion-in-region--data markerp copy-marker t completion-in-region-mode 1 completion--in-region-1] 8 "\n\n(fn START END COLLECTION PREDICATE)"]] 12 "\n\n(fn FUNS GLOBAL ARGS)"](nil nil (#<marker at 26 in *shell*> 31 #[771 "\301?.\303.\300.$)\207" [#[771 "\211\303=\203.\304\305.\300.#\306\"\207\211\307=\203.\301.!\310.\300.#\207\211\242\311=\203.\301.!.A\211G\312U\2035.
\202:.\301.P!\313.\"\204E.\314\315!\210\316.G\316O\317.\300.	.$\302.@.\n\"@.A\312U\203d.\312\202y.
A.G\\\302.\f.	P\"@.GZ\262.\311.BB\207\211\316=\203\241.\301.!\320.\300.#\211;\204\226.\211\202\240.\321..\312\301\302&.@\207\211\322=\203\317.\301.!\323.\300.#\317.\300.\324$@\325...\301\302&.\326.!\211:\203\315.\211\316\241\210.\207\211\327=\205).
\301.!\301.\312.O!\313.\"\203\353.\211G\202.
\301..\316O!\330.\"\203.
.G.GZ\202.
.G.G^.G.GZ\312]\\\331\245\262.\300.\332\333\334\335\336\301\302..
$\337\"\340\341%F\266\204\207" [#[771 "\302.G\303	.\"\203).\304\305\224O.B\262.\306\307\310.\"!.B\262.\305\225\302O\262.\202..\203:.\311=\204O.\242\312=\204O.\313\314..B\237\315#\316.\300.$\262.\202\307.\317\320\321\322.\"\"\313\314..B\237\315#\323.\300..\243\206k.\315$\211@.Y\203\223.\311=\203\204.\316.\300.\n$\202\305.\312.@.GZ\\.ABB\202\305.\311=\203\272.\316.\300.\n$.@Z\321\324\325\326\327\330.!\331\"\332\333%.\"\266\202\202\305.\312..GZ\\.ABB\266\203\207" [#[771 "\211\305=\203.	\203.\305\306\307B\310..#ABB\207\311\n.\312\313\300\314...&.*\207" [file-directory-p pcomplete-compare-entry-function pcomplete-ignore-case completion-ignore-case completion-ignored-extensions metadata cycle-sort-function #[257 "\301.\"\207" [pcomplete-compare-entry-function sort] 4 "\n\n(fn COMPS)"] completion-file-name-table nil completion-table-with-predicate comint-completion-file-name-table strict] 10 "\n\n(fn S P A)"] pcomplete--env-regexp nil string-match 0 1 getenv match-string 2 t boundaries mapconcat identity "" complete-with-action apply + mapcar length completion-boundaries make-byte-code 257 "\211\300\301O\207" vconcat vector [nil] 4 "\n\n(fn S)"] 17 "\n\n(fn STRING PRED ACTION)"] comint--unquote-argument comint--requote-argument metadata append completion-metadata ((completion--unquote-requote . t)) lambda test-completion boundaries 0 string-prefix-p cl--assertion-failed (string-prefix-p ustring ufull) nil completion-boundaries try-completion completion--twq-try t all-completions "" completion--twq-all last completion--unquote string-suffix-p 2 make-byte-code 514 "\211\304=\203..\242;\204..\207\305\302\303.@.A\300\301&.\207\211\306=\203<.\307.!\211A\206).\310.\205;.
\311\241\210\312\302\303..\300\301&.\207\311\207" vconcat vector [1 completion--twq-try 2 last 0 nil completion--twq-all] 11 "\n\n(fn UNQUOTED-RESULT OP)"] 19 "\n\n(fn STRING PRED ACTION)"] nil completion-ignore-case complete-with-action] 8 "\n\n(fn STRING PRED ACTION)"] nil))
  completion--in-region(#<marker at 26 in *shell*> 31 #[771 "\301?.\303.\300.$)\207" [#[771 "\211\303=\203.\304\305.\300.#\306\"\207\211\307=\203.\301.!\310.\300.#\207\211\242\311=\203.\301.!.A\211G\312U\2035.
\202:.\301.P!\313.\"\204E.\314\315!\210\316.G\316O\317.\300.	.$\302.@.\n\"@.A\312U\203d.\312\202y.
A.G\\\302.\f.	P\"@.GZ\262.\311.BB\207\211\316=\203\241.\301.!\320.\300.#\211;\204\226.\211\202\240.\321..\312\301\302&.@\207\211\322=\203\317.\301.!\323.\300.#\317.\300.\324$@\325...\301\302&.\326.!\211:\203\315.\211\316\241\210.\207\211\327=\205).
\301.!\301.\312.O!\313.\"\203\353.\211G\202.
\301..\316O!\330.\"\203.
.G.GZ\202.
.G.G^.G.GZ\312]\\\331\245\262.\300.\332\333\334\335\336\301\302..
$\337\"\340\341%F\266\204\207" [#[771 "\302.G\303	.\"\203).\304\305\224O.B\262.\306\307\310.\"!.B\262.\305\225\302O\262.\202..\203:.\311=\204O.\242\312=\204O.\313\314..B\237\315#\316.\300.$\262.\202\307.\317\320\321\322.\"\"\313\314..B\237\315#\323.\300..\243\206k.\315$\211@.Y\203\223.\311=\203\204.\316.\300.\n$\202\305.\312.@.GZ\\.ABB\202\305.\311=\203\272.\316.\300.\n$.@Z\321\324\325\326\327\330.!\331\"\332\333%.\"\266\202\202\305.\312..GZ\\.ABB\266\203\207" [#[771 "\211\305=\203.	\203.\305\306\307B\310..#ABB\207\311\n.\312\313\300\314...&.*\207" [file-directory-p pcomplete-compare-entry-function pcomplete-ignore-case completion-ignore-case completion-ignored-extensions metadata cycle-sort-function #[257 "\301.\"\207" [pcomplete-compare-entry-function sort] 4 "\n\n(fn COMPS)"] completion-file-name-table nil completion-table-with-predicate comint-completion-file-name-table strict] 10 "\n\n(fn S P A)"] pcomplete--env-regexp nil string-match 0 1 getenv match-string 2 t boundaries mapconcat identity "" complete-with-action apply + mapcar length completion-boundaries make-byte-code 257 "\211\300\301O\207" vconcat vector [nil] 4 "\n\n(fn S)"] 17 "\n\n(fn STRING PRED ACTION)"] comint--unquote-argument comint--requote-argument metadata append completion-metadata ((completion--unquote-requote . t)) lambda test-completion boundaries 0 string-prefix-p cl--assertion-failed (string-prefix-p ustring ufull) nil completion-boundaries try-completion completion--twq-try t all-completions "" completion--twq-all last completion--unquote string-suffix-p 2 make-byte-code 514 "\211\304=\203..\242;\204..\207\305\302\303.@.A\300\301&.\207\211\306=\203<.\307.!\211A\206).\310.\205;.
\311\241\210\312\302\303..\300\301&.\207\311\207" vconcat vector [1 completion--twq-try 2 last 0 nil completion--twq-all] 11 "\n\n(fn UNQUOTED-RESULT OP)"] 19 "\n\n(fn STRING PRED ACTION)"] nil completion-ignore-case complete-with-action] 8 "\n\n(fn STRING PRED ACTION)"] nil)
  completion-in-region(#<marker at 26 in *shell*> 31 #[771 "\301?.\303.\300.$)\207" [#[771 "\211\303=\203.\304\305.\300.#\306\"\207\211\307=\203.\301.!\310.\300.#\207\211\242\311=\203.\301.!.A\211G\312U\2035.
\202:.\301.P!\313.\"\204E.\314\315!\210\316.G\316O\317.\300.	.$\302.@.\n\"@.A\312U\203d.\312\202y.
A.G\\\302.\f.	P\"@.GZ\262.\311.BB\207\211\316=\203\241.\301.!\320.\300.#\211;\204\226.\211\202\240.\321..\312\301\302&.@\207\211\322=\203\317.\301.!\323.\300.#\317.\300.\324$@\325...\301\302&.\326.!\211:\203\315.\211\316\241\210.\207\211\327=\205).
\301.!\301.\312.O!\313.\"\203\353.\211G\202.
\301..\316O!\330.\"\203.
.G.GZ\202.
.G.G^.G.GZ\312]\\\331\245\262.\300.\332\333\334\335\336\301\302..
$\337\"\340\341%F\266\204\207" [#[771 "\302.G\303	.\"\203).\304\305\224O.B\262.\306\307\310.\"!.B\262.\305\225\302O\262.\202..\203:.\311=\204O.\242\312=\204O.\313\314..B\237\315#\316.\300.$\262.\202\307.\317\320\321\322.\"\"\313\314..B\237\315#\323.\300..\243\206k.\315$\211@.Y\203\223.\311=\203\204.\316.\300.\n$\202\305.\312.@.GZ\\.ABB\202\305.\311=\203\272.\316.\300.\n$.@Z\321\324\325\326\327\330.!\331\"\332\333%.\"\266\202\202\305.\312..GZ\\.ABB\266\203\207" [#[771 "\211\305=\203.	\203.\305\306\307B\310..#ABB\207\311\n.\312\313\300\314...&.*\207" [file-directory-p pcomplete-compare-entry-function pcomplete-ignore-case completion-ignore-case completion-ignored-extensions metadata cycle-sort-function #[257 "\301.\"\207" [pcomplete-compare-entry-function sort] 4 "\n\n(fn COMPS)"] completion-file-name-table nil completion-table-with-predicate comint-completion-file-name-table strict] 10 "\n\n(fn S P A)"] pcomplete--env-regexp nil string-match 0 1 getenv match-string 2 t boundaries mapconcat identity "" complete-with-action apply + mapcar length completion-boundaries make-byte-code 257 "\211\300\301O\207" vconcat vector [nil] 4 "\n\n(fn S)"] 17 "\n\n(fn STRING PRED ACTION)"] comint--unquote-argument comint--requote-argument metadata append completion-metadata ((completion--unquote-requote . t)) lambda test-completion boundaries 0 string-prefix-p cl--assertion-failed (string-prefix-p ustring ufull) nil completion-boundaries try-completion completion--twq-try t all-completions "" completion--twq-all last completion--unquote string-suffix-p 2 make-byte-code 514 "\211\304=\203..\242;\204..\207\305\302\303.@.A\300\301&.\207\211\306=\203<.\307.!\211A\206).\310.\205;.
\311\241\210\312\302\303..\300\301&.\207\311\207" vconcat vector [1 completion--twq-try 2 last 0 nil completion--twq-all] 11 "\n\n(fn UNQUOTED-RESULT OP)"] 19 "\n\n(fn STRING PRED ACTION)"] nil completion-ignore-case complete-with-action] 8 "\n\n(fn STRING PRED ACTION)"] nil)
  completion-at-point()
  complete-symbol(nil)
  funcall-interactively(complete-symbol nil)
  call-interactively(complete-symbol nil nil)
  command-execute(complete-symbol)


In GNU Emacs 25.0.92.4 (x86_64-unknown-linux-gnu, GTK+ Version 3.16.7)
 of 2016-03-20 built on axl
Repository revision: 26f9c5075ff273013418a66b70fae477301d41d5
Windowing system distributor 'The X.Org Foundation', version 11.0.11702000
System Description:	Ubuntu 15.10

Message #12 received at 23117 <at> debbugs.gnu.org (full text, mbox):

From: Lars Ingebrigtsen <larsi <at> gnus.org>
To: Dmitry Gutov <dgutov <at> yandex.ru>
Cc: 23117 <at> debbugs.gnu.org, Stefan Monnier <monnier <at> IRO.UMontreal.CA>
Subject: Re: bug#23117: 25.0.92; Having pcomplete-ignore-case different from
 completion-ignore-case can lead to an error
Date: Sun, 07 Feb 2021 14:58:14 +0100

Dmitry Gutov <dgutov <at> yandex.ru> writes:

> 1. (setq pcomplete-ignore-case t)
> 2. Keep completion-ignore-case at its default nil value.
> 3. M-x shell
> 3. Type 'cd /Usr/', press C-M-i.
> 4. See the below error.
>
> Should the former variable just be made into an alias for the latter one?
>
> Debugger entered--Lisp error: (error "Internal error: usr/games/ doesn’t match \\`Usr\\(.*?\\)/")

This is still the case in Emacs 28, so the question remains, I guess --
should one of them be made into an alias for the other, and in that
case, which one should be the alias?

Stefan M added to the CCs.

-- 
(domestic pets only, the antidote for overdose, milk.)
   bloggy blog: http://lars.ingebrigtsen.no

Message #17 received at 23117 <at> debbugs.gnu.org (full text, mbox):

From: Stefan Monnier <monnier <at> iro.umontreal.ca>
To: Lars Ingebrigtsen <larsi <at> gnus.org>
Cc: 23117 <at> debbugs.gnu.org, Dmitry Gutov <dgutov <at> yandex.ru>
Subject: Re: bug#23117: 25.0.92; Having pcomplete-ignore-case different from
 completion-ignore-case can lead to an error
Date: Mon, 08 Feb 2021 17:08:07 -0500

>> 1. (setq pcomplete-ignore-case t)
>> 2. Keep completion-ignore-case at its default nil value.
>> 3. M-x shell
>> 3. Type 'cd /Usr/', press C-M-i.
>> 4. See the below error.
>>
>> Should the former variable just be made into an alias for the latter one?
>>
>> Debugger entered--Lisp error: (error "Internal error: usr/games/ doesn’t match \\`Usr\\(.*?\\)/")
>
> This is still the case in Emacs 28, so the question remains, I guess --
> should one of them be made into an alias for the other,

That would be nice, yes.

> and in that case, which one should be the alias?

`pcomplete-ignore-case` fundamentally belongs to the pcomplete UI which
is considered obsolete, so I'd make that an alias for the
core variable `completion-ignore-case`.


        Stefan

Message #20 received at 23117 <at> debbugs.gnu.org (full text, mbox):

From: Lars Ingebrigtsen <larsi <at> gnus.org>
To: Stefan Monnier <monnier <at> iro.umontreal.ca>
Cc: 23117 <at> debbugs.gnu.org, Dmitry Gutov <dgutov <at> yandex.ru>
Subject: Re: bug#23117: 25.0.92; Having pcomplete-ignore-case different from
 completion-ignore-case can lead to an error
Date: Tue, 09 Feb 2021 09:24:07 +0100

Stefan Monnier <monnier <at> iro.umontreal.ca> writes:

> `pcomplete-ignore-case` fundamentally belongs to the pcomplete UI which
> is considered obsolete, so I'd make that an alias for the
> core variable `completion-ignore-case`.

OK; now done.

-- 
(domestic pets only, the antidote for overdose, milk.)
   bloggy blog: http://lars.ingebrigtsen.no

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.