Mercurial > emacs
comparison lisp/comint.el @ 4326:37a37a8300c4
(comint-replace-by-expanded-filename, comint-dynamic-complete): Say "Sole
completion" instead of "Unique completion", for consistency with the rest
of the known universe.
| author | Roland McGrath <roland@gnu.org> |
|---|---|
| date | Wed, 28 Jul 1993 22:41:43 +0000 |
| parents | ab7dee78e335 |
| children | fe5912b3526a |
comparison
equal
deleted
inserted
replaced
| 4325:afdc363a0c9b | 4326:37a37a8300c4 |
|---|---|
| 1167 (or pathdir default-directory)))) | 1167 (or pathdir default-directory)))) |
| 1168 (cond ((null completion) | 1168 (cond ((null completion) |
| 1169 (message "No completions of %s" pathname) | 1169 (message "No completions of %s" pathname) |
| 1170 (ding)) | 1170 (ding)) |
| 1171 ((eql completion t) | 1171 ((eql completion t) |
| 1172 (message "Unique completion")) | 1172 (message "Sole completion")) |
| 1173 (t ; this means a string was returned. | 1173 (t ; this means a string was returned. |
| 1174 (delete-region (match-beginning 0) (match-end 0)) | 1174 (delete-region (match-beginning 0) (match-end 0)) |
| 1175 (insert (expand-file-name (concat pathdir completion))))))) | 1175 (insert (expand-file-name (concat pathdir completion))))))) |
| 1176 | 1176 |
| 1177 | 1177 |