Mercurial > emacs
comparison lisp/completion.el @ 67273:554ddf754b2b
(save-completions-file-name): Fix typo in last change.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Fri, 02 Dec 2005 21:12:28 +0000 |
| parents | 35b9e081ceed |
| children | 311328d6ca44 7beb78bc1f8e |
comparison
equal
deleted
inserted
replaced
| 67272:262b81412a91 | 67273:554ddf754b2b |
|---|---|
| 300 (defcustom save-completions-file-name | 300 (defcustom save-completions-file-name |
| 301 (let ((olddef (convert-standard-filename "~/.completions"))) | 301 (let ((olddef (convert-standard-filename "~/.completions"))) |
| 302 (cond | 302 (cond |
| 303 ((file-readable-p olddef) olddef) | 303 ((file-readable-p olddef) olddef) |
| 304 ((file-directory-p (convert-standard-filename "~/.emacs.d/")) | 304 ((file-directory-p (convert-standard-filename "~/.emacs.d/")) |
| 305 (convert-standard-filename (expand-file-name completions "~/.emacs.d/"))) | 305 (convert-standard-filename |
| 306 (expand-file-name "completions" "~/.emacs.d/"))) | |
| 306 (t olddef))) | 307 (t olddef))) |
| 307 "The filename to save completions to." | 308 "The filename to save completions to." |
| 308 :type 'file | 309 :type 'file |
| 309 :group 'completion) | 310 :group 'completion) |
| 310 | 311 |