diff options
| author | Juri Linkov | 2008-11-22 20:45:09 +0000 |
|---|---|---|
| committer | Juri Linkov | 2008-11-22 20:45:09 +0000 |
| commit | 85b843194ef5664c2a7ed64160eb2bf6fd2c0aa1 (patch) | |
| tree | 4c5c0cd59ddf3a7c2df47d2f4085f433da8f8f90 | |
| parent | 0e0f6cbde0ac647c2f9a2873693f1d14ca3d58a1 (diff) | |
| download | emacs-85b843194ef5664c2a7ed64160eb2bf6fd2c0aa1.tar.gz emacs-85b843194ef5664c2a7ed64160eb2bf6fd2c0aa1.zip | |
(initial-buffer-choice): Change an abstract file name
"file.txt" to more reasonable default file name value "~/.emacs".
| -rw-r--r-- | lisp/ChangeLog | 27 | ||||
| -rw-r--r-- | lisp/startup.el | 2 |
2 files changed, 28 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1f113e5d5e8..6c3c89b1d9e 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,32 @@ | |||
| 1 | 2008-11-22 Juri Linkov <juri@jurta.org> | 1 | 2008-11-22 Juri Linkov <juri@jurta.org> |
| 2 | 2 | ||
| 3 | * dired-aux.el (dired-isearch-filenames): Add new context-dependent | ||
| 4 | option `dwim'. Change non-dwim option from `dired-filename' to `t'. | ||
| 5 | Doc fix. | ||
| 6 | (dired-isearch-filenames-setup): Run filename Isearch only when | ||
| 7 | dired-isearch-filenames is t or dired-isearch-filenames is `dwim' | ||
| 8 | and the text property `dired-filename' at point is non-nil. | ||
| 9 | In this case also set isearch-message-prefix-add to "filename ". | ||
| 10 | (dired-isearch-filenames-end): Set isearch-message-prefix-add to nil. | ||
| 11 | (dired-isearch-filenames, dired-isearch-filenames-regexp): | ||
| 12 | Don't let-bind isearch-message-prefix-add since this is done now | ||
| 13 | in dired-isearch-filenames-setup. | ||
| 14 | |||
| 15 | * isearch.el (isearch-mode): Change the order of calling | ||
| 16 | `isearch-update' and running the `isearch-mode-hook' to call | ||
| 17 | `isearch-update' with Isearch parameters set in this hook. | ||
| 18 | |||
| 19 | * progmodes/compile.el (compilation-auto-jump-to-first-error): | ||
| 20 | Fix docstring - change "during `compile'" to "during compilation". | ||
| 21 | |||
| 22 | * descr-text.el (describe-char-unidata-list): Move `old-name' to | ||
| 23 | be immediately after `name'. | ||
| 24 | |||
| 25 | * startup.el (initial-buffer-choice): Change an abstract file name | ||
| 26 | "file.txt" to more reasonable default file name value "~/.emacs". | ||
| 27 | |||
| 28 | 2008-11-22 Juri Linkov <juri@jurta.org> | ||
| 29 | |||
| 3 | * files.el (hack-local-variables-confirm): Rename arg `project' to | 30 | * files.el (hack-local-variables-confirm): Rename arg `project' to |
| 4 | `dir-name'. Move `(or dir-name name)' to let-binding of `name'. | 31 | `dir-name'. Move `(or dir-name name)' to let-binding of `name'. |
| 5 | (hack-local-variables-filter): Rename arg `project' to `dir-name'. | 32 | (hack-local-variables-filter): Rename arg `project' to `dir-name'. |
diff --git a/lisp/startup.el b/lisp/startup.el index 253ac887fe7..f328a914584 100644 --- a/lisp/startup.el +++ b/lisp/startup.el | |||
| @@ -47,7 +47,7 @@ directory using `find-file'. If t, open the `*scratch*' buffer." | |||
| 47 | :type '(choice | 47 | :type '(choice |
| 48 | (const :tag "Startup screen" nil) | 48 | (const :tag "Startup screen" nil) |
| 49 | (directory :tag "Directory" :value "~/") | 49 | (directory :tag "Directory" :value "~/") |
| 50 | (file :tag "File" :value "~/file.txt") | 50 | (file :tag "File" :value "~/.emacs") |
| 51 | (const :tag "Lisp scratch buffer" t)) | 51 | (const :tag "Lisp scratch buffer" t)) |
| 52 | :version "23.1" | 52 | :version "23.1" |
| 53 | :group 'initialization) | 53 | :group 'initialization) |