aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorGlenn Morris2012-12-21 11:32:43 -0800
committerGlenn Morris2012-12-21 11:32:43 -0800
commita4b0cca119b01dc55bad802ef696c857fe014482 (patch)
treef2df86b3d472d15d3bbb69274325a7c0090f65b3 /lisp
parent0e9c7693712014196946a83709a83c08a7dfea25 (diff)
parent160b3852018831b830a7451f29f770fb49810342 (diff)
downloademacs-a4b0cca119b01dc55bad802ef696c857fe014482.tar.gz
emacs-a4b0cca119b01dc55bad802ef696c857fe014482.zip
Merge from emacs-24; up to 2012-12-01T13:25:13Z!cyd@gnu.org
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog8
-rw-r--r--lisp/ldefs-boot.el2
-rw-r--r--lisp/progmodes/etags.el2
-rw-r--r--lisp/sort.el9
4 files changed, 17 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2fd19c4a467..5e26ee1fca1 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
12012-12-21 Chong Yidong <cyd@gnu.org>
2
3 * sort.el (sort-subr): Doc fix (Bug#13056).
4
52012-12-21 Bastien Guerry <bzg@gnu.org>
6
7 * progmodes/etags.el (tags-search): Fix typo. Bug #13232.
8
12012-12-21 Michael Albinus <michael.albinus@gmx.de> 92012-12-21 Michael Albinus <michael.albinus@gmx.de>
2 10
3 * simple.el (process-file): Overwrite stderr file, if exists. 11 * simple.el (process-file): Overwrite stderr file, if exists.
diff --git a/lisp/ldefs-boot.el b/lisp/ldefs-boot.el
index 095a7229c60..167fd36fe82 100644
--- a/lisp/ldefs-boot.el
+++ b/lisp/ldefs-boot.el
@@ -9735,7 +9735,7 @@ If FILE-LIST-FORM is non-nil, it should be a form that, when
9735evaluated, will return a list of file names. The search will be 9735evaluated, will return a list of file names. The search will be
9736restricted to these files. 9736restricted to these files.
9737 9737
9738Aleso see the documentation of the `tags-file-name' variable. 9738Also see the documentation of the `tags-file-name' variable.
9739 9739
9740\(fn REGEXP &optional FILE-LIST-FORM)" t nil) 9740\(fn REGEXP &optional FILE-LIST-FORM)" t nil)
9741 9741
diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el
index 067d89781d2..b3728a3abf3 100644
--- a/lisp/progmodes/etags.el
+++ b/lisp/progmodes/etags.el
@@ -1869,7 +1869,7 @@ If FILE-LIST-FORM is non-nil, it should be a form that, when
1869evaluated, will return a list of file names. The search will be 1869evaluated, will return a list of file names. The search will be
1870restricted to these files. 1870restricted to these files.
1871 1871
1872Aleso see the documentation of the `tags-file-name' variable." 1872Also see the documentation of the `tags-file-name' variable."
1873 (interactive "sTags search (regexp): ") 1873 (interactive "sTags search (regexp): ")
1874 (if (and (equal regexp "") 1874 (if (and (equal regexp "")
1875 (eq (car tags-loop-scan) 're-search-forward) 1875 (eq (car tags-loop-scan) 're-search-forward)
diff --git a/lisp/sort.el b/lisp/sort.el
index cd0b4433ab3..7a3adfdc5e3 100644
--- a/lisp/sort.el
+++ b/lisp/sort.el
@@ -77,8 +77,13 @@ ENDKEYFUN moves from the start of the sort key to the end of the sort key.
77ENDKEYFUN may be nil if STARTKEYFUN returns a value or if it would be the 77ENDKEYFUN may be nil if STARTKEYFUN returns a value or if it would be the
78same as ENDRECFUN. 78same as ENDRECFUN.
79 79
80PREDICATE is the function to use to compare keys. If keys are numbers, 80PREDICATE, if non-nil, is the predicate function for comparing
81it defaults to `<', otherwise it defaults to `string<'." 81keys; it is called with two arguments, the keys to compare, and
82should return non-nil if the first key should sort before the
83second key. If PREDICATE is nil, comparison is done with `<' if
84the keys are numbers, with `compare-buffer-substrings' if the
85keys are cons cells (the car and cdr of each cons cell are taken
86as start and end positions), and with `string<' otherwise."
82 ;; Heuristically try to avoid messages if sorting a small amt of text. 87 ;; Heuristically try to avoid messages if sorting a small amt of text.
83 (let ((messages (> (- (point-max) (point-min)) 50000))) 88 (let ((messages (> (- (point-max) (point-min)) 50000)))
84 (save-excursion 89 (save-excursion