aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorGlenn Morris2014-06-08 16:41:43 -0700
committerGlenn Morris2014-06-08 16:41:43 -0700
commitfd60bf6c902b47daadda6ebf442045dbe1328941 (patch)
treefd351a1fc087aefbca38b87102f06edf9f8b04ff /lisp
parentff2d0e8336c05cb7d3e86f7406784cefc1d6589e (diff)
parent4181427f24e591f539122db2e3d8d8b55a7de7cd (diff)
downloademacs-fd60bf6c902b47daadda6ebf442045dbe1328941.tar.gz
emacs-fd60bf6c902b47daadda6ebf442045dbe1328941.zip
Merge from emacs-24; up to 2014-06-02T11:35:40Z!michael.albinus@gmx.de
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog8
-rw-r--r--lisp/bookmark.el3
-rw-r--r--lisp/files.el2
-rw-r--r--lisp/startup.el15
-rw-r--r--lisp/uniquify.el30
5 files changed, 36 insertions, 22 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 80105470985..2ce06f6ba54 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
12014-06-08 Glenn Morris <rgm@gnu.org>
2
3 * startup.el (initial-buffer-choice): Doc fix.
4 Reset :version (adding an option does not merit a :version bump).
5
6 * bookmark.el (bookmark-load):
7 * uniquify.el (uniquify-buffer-name-style): Doc fixes.
8
12014-06-08 Juri Linkov <juri@jurta.org> 92014-06-08 Juri Linkov <juri@jurta.org>
2 10
3 * desktop.el: Activate auto-saving on window configuration changes. 11 * desktop.el: Activate auto-saving on window configuration changes.
diff --git a/lisp/bookmark.el b/lisp/bookmark.el
index e4e4ed9afcb..7ea54a8e2b4 100644
--- a/lisp/bookmark.el
+++ b/lisp/bookmark.el
@@ -1420,8 +1420,7 @@ explicitly.
1420 1420
1421If you load a file containing bookmarks with the same names as 1421If you load a file containing bookmarks with the same names as
1422bookmarks already present in your Emacs, the new bookmarks will get 1422bookmarks already present in your Emacs, the new bookmarks will get
1423unique numeric suffixes \"<2>\", \"<3>\", ... following the same 1423unique numeric suffixes \"<2>\", \"<3>\", etc."
1424method buffers use to resolve name collisions."
1425 (interactive 1424 (interactive
1426 (list (read-file-name 1425 (list (read-file-name
1427 (format "Load bookmarks from: (%s) " 1426 (format "Load bookmarks from: (%s) "
diff --git a/lisp/files.el b/lisp/files.el
index cf54df710c2..0b3e1d6f552 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -1637,6 +1637,8 @@ killed."
1637 (let (kill-buffer-query-functions kill-buffer-hook) 1637 (let (kill-buffer-query-functions kill-buffer-hook)
1638 (kill-buffer obuf)))))) 1638 (kill-buffer obuf))))))
1639 1639
1640;; FIXME we really need to fold the uniquify stuff in here by default,
1641;; not using advice, and add it to the doc string.
1640(defun create-file-buffer (filename) 1642(defun create-file-buffer (filename)
1641 "Create a suitably named buffer for visiting FILENAME, and return it. 1643 "Create a suitably named buffer for visiting FILENAME, and return it.
1642FILENAME (sans directory) is used unchanged if that name is free; 1644FILENAME (sans directory) is used unchanged if that name is free;
diff --git a/lisp/startup.el b/lisp/startup.el
index 5a4ddf335c4..aa448848cea 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -42,20 +42,21 @@
42 "Buffer to show after starting Emacs. 42 "Buffer to show after starting Emacs.
43If the value is nil and `inhibit-startup-screen' is nil, show the 43If the value is nil and `inhibit-startup-screen' is nil, show the
44startup screen. If the value is a string, switch to a buffer 44startup screen. If the value is a string, switch to a buffer
45visiting the file or directory specified by that string. If the 45visiting the file or directory that the string specifies. If the
46value is a function, switch to the buffer returned by that 46value is a function, call it with no arguments and switch to the buffer
47function. If t, open the `*scratch*' buffer. 47that it returns. If t, open the `*scratch*' buffer.
48 48
49A string value also causes emacsclient to open the specified file 49If you use `emacsclient' with no target file, then it obeys any
50or directory when no target file is specified." 50string or function value that this variable has."
51 :type '(choice 51 :type '(choice
52 (const :tag "Startup screen" nil) 52 (const :tag "Startup screen" nil)
53 (directory :tag "Directory" :value "~/") 53 (directory :tag "Directory" :value "~/")
54 (file :tag "File" :value "~/.emacs") 54 (file :tag "File" :value "~/.emacs")
55 (const :tag "Notes buffer" remember-notes) 55 ;; Note sure about hard-coding this as an option...
56 (const :tag "Remember Mode notes buffer" remember-notes)
56 (function :tag "Function") 57 (function :tag "Function")
57 (const :tag "Lisp scratch buffer" t)) 58 (const :tag "Lisp scratch buffer" t))
58 :version "24.4" 59 :version "23.1"
59 :group 'initialization) 60 :group 'initialization)
60 61
61(defcustom inhibit-startup-screen nil 62(defcustom inhibit-startup-screen nil
diff --git a/lisp/uniquify.el b/lisp/uniquify.el
index 5d973c72897..f0e86dc544f 100644
--- a/lisp/uniquify.el
+++ b/lisp/uniquify.el
@@ -26,7 +26,7 @@
26 26
27;;; Commentary: 27;;; Commentary:
28 28
29;; Emacs's standard method for making buffer names unique adds <2>, <3>, 29;; Emacs's traditional method for making buffer names unique adds <2>, <3>,
30;; etc. to the end of (all but one of) the buffers. This file replaces 30;; etc. to the end of (all but one of) the buffers. This file replaces
31;; that behavior, for buffers visiting files and dired buffers, with a 31;; that behavior, for buffers visiting files and dired buffers, with a
32;; uniquification that adds parts of the file name until the buffer names 32;; uniquification that adds parts of the file name until the buffer names
@@ -94,23 +94,27 @@
94 94
95 95
96(defcustom uniquify-buffer-name-style 'post-forward-angle-brackets 96(defcustom uniquify-buffer-name-style 'post-forward-angle-brackets
97 "If non-nil, buffer names are uniquified with parts of directory name. 97 "How to construct unique buffer names for files with the same base name.
98The value determines the buffer name style and is one of `forward', 98The value can be one of: `forward', `reverse', `post-forward',
99`reverse', `post-forward', or `post-forward-angle-brackets'. 99`post-forward-angle-brackets', or nil.
100For example, files `/foo/bar/mumble/name' and `/baz/quux/mumble/name' 100
101For example, the files `/foo/bar/mumble/name' and `/baz/quux/mumble/name'
101would have the following buffer names in the various styles: 102would have the following buffer names in the various styles:
102 forward bar/mumble/name quux/mumble/name 103
103 reverse name\\mumble\\bar name\\mumble\\quux 104 forward bar/mumble/name quux/mumble/name
104 post-forward name|bar/mumble name|quux/mumble 105 reverse name\\mumble\\bar name\\mumble\\quux
105 post-forward-angle-brackets name<bar/mumble> name<quux/mumble> 106 post-forward name|bar/mumble name|quux/mumble
106 nil name name<2> 107 post-forward-angle-brackets name<bar/mumble> name<quux/mumble>
107Of course, the \"mumble\" part may be stripped as well, depending on the setting 108 nil name name<2>
108of `uniquify-strip-common-suffix'." 109
110The \"mumble\" part may be stripped as well, depending on the
111setting of `uniquify-strip-common-suffix'. For more options that
112you can set, browse the `uniquify' custom group."
109 :type '(radio (const forward) 113 :type '(radio (const forward)
110 (const reverse) 114 (const reverse)
111 (const post-forward) 115 (const post-forward)
112 (const post-forward-angle-brackets) 116 (const post-forward-angle-brackets)
113 (const :tag "standard Emacs behavior (nil)" nil)) 117 (const :tag "numeric suffixes" nil))
114 :version "24.4" 118 :version "24.4"
115 :require 'uniquify 119 :require 'uniquify
116 :group 'uniquify) 120 :group 'uniquify)