Mercurial > emacs
comparison lisp/ido.el @ 73376:22f24dad9952
2006-10-15 Micha¸«³l Cadilhac <michael.cadilhac@lrde.org>
(ido-exhibit): Allow `-', `_', and trailing `$' in user id.
| author | Kim F. Storm <storm@cua.dk> |
|---|---|
| date | Sun, 15 Oct 2006 20:33:12 +0000 |
| parents | acb35bee2828 |
| children | 98bbab587745 |
comparison
equal
deleted
inserted
replaced
| 73375:7f5141d05971 | 73376:22f24dad9952 |
|---|---|
| 4166 ((string-equal contents "../") | 4166 ((string-equal contents "../") |
| 4167 (ido-up-directory t) | 4167 (ido-up-directory t) |
| 4168 (setq refresh t)) | 4168 (setq refresh t)) |
| 4169 ((string-equal contents "./") | 4169 ((string-equal contents "./") |
| 4170 (setq refresh t)) | 4170 (setq refresh t)) |
| 4171 ((string-match "\\`~[a-zA-Z0-9]+/\\'" contents) | 4171 ((string-match "\\`~[-_a-zA-Z0-9]+[$]?/\\'" contents) |
| 4172 (ido-trace "new home" contents) | 4172 (ido-trace "new home" contents) |
| 4173 (ido-set-current-home contents) | 4173 (ido-set-current-home contents) |
| 4174 (setq refresh t)) | 4174 (setq refresh t)) |
| 4175 ((string-match "[$][A-Za-z0-9_]+/\\'" contents) | 4175 ((string-match "[$][A-Za-z0-9_]+/\\'" contents) |
| 4176 (let ((exp (condition-case () | 4176 (let ((exp (condition-case () |