commit 88b9a8000da6cf2d4aede86e9eae4f00016d0d6b (HEAD, refs/remotes/origin/master) Author: Paul Eggert Date: Sat Sep 5 16:38:38 2015 -0700 Spelling fix (Bug#21420) diff --git a/lisp/cedet/ede.el b/lisp/cedet/ede.el index 7d99b17..27d7abe 100644 --- a/lisp/cedet/ede.el +++ b/lisp/cedet/ede.el @@ -764,7 +764,7 @@ Optional argument NAME is the name to give this project." (if cs (error "No valid interactive sub project types for %s" cs) - (error "EDE error: Can't fin project types to create"))) + (error "EDE error: Can't find project types to create"))) r) ) nil t))) commit 1b5fda5cbca96aec3e407bc9e4f8a16e48e7954c Author: Nicolas Petton Date: Sun Sep 6 00:51:35 2015 +0200 Improve the semantic of map-some Update map-some to return the returned by the predicate, similar to seq-some. * lisp/emacs-lisp/map.el (map-some): Update the function to return the return value of the predicate. * test/automated/map-tests.el (test-map-some): Update the test to check for non-nil values only. diff --git a/lisp/emacs-lisp/map.el b/lisp/emacs-lisp/map.el index 4e7d3b9..ea56efe 100644 --- a/lisp/emacs-lisp/map.el +++ b/lisp/emacs-lisp/map.el @@ -262,8 +262,9 @@ MAP can be a list, hash-table or array." MAP can be a list, hash-table or array." (catch 'map--break (map-apply (lambda (key value) - (when (funcall pred key value) - (throw 'map--break (cons key value)))) + (let ((result (funcall pred key value))) + (when result + (throw 'map--break result)))) map) nil)) diff --git a/test/automated/map-tests.el b/test/automated/map-tests.el index ca68004..8693415 100644 --- a/test/automated/map-tests.el +++ b/test/automated/map-tests.el @@ -262,21 +262,19 @@ Evaluate BODY for each created map. (ert-deftest test-map-some () (with-maps-do map - (should (equal (map-some (lambda (k _v) - (eq 1 k)) - map) - (cons 1 4))) - (should (not (map-some (lambda (k _v) - (eq 'd k)) - map)))) + (should (map-some (lambda (k _v) + (eq 1 k)) + map)) + (should-not (map-some (lambda (k _v) + (eq 'd k)) + map))) (let ((vec [a b c])) - (should (equal (map-some (lambda (k _v) - (> k 1)) - vec) - (cons 2 'c))) - (should (not (map-some (lambda (k _v) - (> k 3)) - vec))))) + (should (map-some (lambda (k _v) + (> k 1)) + vec)) + (should-not (map-some (lambda (k _v) + (> k 3)) + vec)))) (ert-deftest test-map-every-p () (with-maps-do map commit a1535f938181ea137037d0233924a2c9d9e08f76 Author: Nicolas Petton Date: Sun Sep 6 00:45:48 2015 +0200 Rename map-contains-key-p and map-some-p Remove the "-p" suffix from both function names. * lisp/emacs-lisp/map.el (map-contains-key, map-some): Rename the functions. * test/automated/map-tests.el (test-map-contains-key, test-map-some): Update both test functions. diff --git a/lisp/emacs-lisp/map.el b/lisp/emacs-lisp/map.el index 5014571..4e7d3b9 100644 --- a/lisp/emacs-lisp/map.el +++ b/lisp/emacs-lisp/map.el @@ -249,15 +249,15 @@ MAP can be a list, hash-table or array." :array (seq-empty-p map) :hash-table (zerop (hash-table-count map)))) -(defun map-contains-key-p (map key &optional testfn) +(defun map-contains-key (map key &optional testfn) "Return non-nil if MAP contain the key KEY, nil otherwise. Equality is defined by TESTFN if non-nil or by `equal' if nil. MAP can be a list, hash-table or array." - (seq-contains-p (map-keys map) key testfn)) + (seq-contains (map-keys map) key testfn)) -(defun map-some-p (pred map) - "Return a key/value pair for which (PRED key val) is non-nil in MAP. +(defun map-some (pred map) + "Return a non-nil if (PRED key val) is non-nil for any key/value pair in MAP. MAP can be a list, hash-table or array." (catch 'map--break diff --git a/test/automated/map-tests.el b/test/automated/map-tests.el index 1f3a07e..ca68004 100644 --- a/test/automated/map-tests.el +++ b/test/automated/map-tests.el @@ -252,29 +252,29 @@ Evaluate BODY for each created map. (should (not (map-empty-p "hello"))) (should (map-empty-p ""))) -(ert-deftest test-map-contains-key-p () - (should (map-contains-key-p '((a . 1) (b . 2)) 'a)) - (should (not (map-contains-key-p '((a . 1) (b . 2)) 'c))) - (should (map-contains-key-p '(("a" . 1)) "a")) - (should (not (map-contains-key-p '(("a" . 1)) "a" #'eq))) - (should (map-contains-key-p [a b c] 2)) - (should (not (map-contains-key-p [a b c] 3)))) - -(ert-deftest test-map-some-p () +(ert-deftest test-map-contains-key () + (should (map-contains-key '((a . 1) (b . 2)) 'a)) + (should (not (map-contains-key '((a . 1) (b . 2)) 'c))) + (should (map-contains-key '(("a" . 1)) "a")) + (should (not (map-contains-key '(("a" . 1)) "a" #'eq))) + (should (map-contains-key [a b c] 2)) + (should (not (map-contains-key [a b c] 3)))) + +(ert-deftest test-map-some () (with-maps-do map - (should (equal (map-some-p (lambda (k _v) + (should (equal (map-some (lambda (k _v) (eq 1 k)) map) (cons 1 4))) - (should (not (map-some-p (lambda (k _v) + (should (not (map-some (lambda (k _v) (eq 'd k)) map)))) (let ((vec [a b c])) - (should (equal (map-some-p (lambda (k _v) + (should (equal (map-some (lambda (k _v) (> k 1)) vec) (cons 2 'c))) - (should (not (map-some-p (lambda (k _v) + (should (not (map-some (lambda (k _v) (> k 3)) vec))))) commit aeb1d6bdd54671a2e2b7dfbd22fcfe1aa19b36d1 Author: Nicolas Petton Date: Sun Sep 6 00:26:17 2015 +0200 Improve the semantic of seq-some Update seq-some to return non-nil if the predicate returns non-nil for any element of the seq, in which case the returned value is the one returned by the predicate. * lisp/emacs-lisp/seq.el (seq-some): Update the function and its docstring. * test/automated/seq-tests.el (test-seq-some): Add a regression test. * doc/lispref/sequences.texi (Sequence Functions): Update the documentation for seq-some. diff --git a/doc/lispref/sequences.texi b/doc/lispref/sequences.texi index 22ae995..f73779b 100644 --- a/doc/lispref/sequences.texi +++ b/doc/lispref/sequences.texi @@ -558,18 +558,23 @@ calling @var{function}. @end defun @defun seq-some predicate sequence - This function returns the first member of sequence for which @var{predicate} -returns non-@code{nil}. + This function returns non-@code{nil} if @var{predicate} returns +non-@code{nil} for any element of @var{sequence}. If so, the returned +value is the value returned by @var{predicate}. @example @group (seq-some #'numberp ["abc" 1 nil]) -@result{} 1 +@result{} t @end group @group (seq-some #'numberp ["abc" "def"]) @result{} nil @end group +@group +(seq-some #'null ["abc" 1 nil]) +@result{} t +@end group @end example @end defun diff --git a/lisp/emacs-lisp/seq.el b/lisp/emacs-lisp/seq.el index bf5495b..8dc9147 100644 --- a/lisp/emacs-lisp/seq.el +++ b/lisp/emacs-lisp/seq.el @@ -261,11 +261,13 @@ If SEQ is empty, return INITIAL-VALUE and FUNCTION is not called." t)) (cl-defgeneric seq-some (pred seq) - "Return any element for which (PRED element) is non-nil in SEQ, nil otherwise." + "Return non-nil if (PRED element) is non-nil for any element in SEQ, nil otherwise. +If so, return the non-nil value returned by PRED." (catch 'seq--break (seq-doseq (elt seq) - (when (funcall pred elt) - (throw 'seq--break elt))) + (let ((result (funcall pred elt))) + (when result + (throw 'seq--break result)))) nil)) (cl-defgeneric seq-count (pred seq) @@ -280,8 +282,8 @@ If SEQ is empty, return INITIAL-VALUE and FUNCTION is not called." "Return the first element in SEQ that equals to ELT. Equality is defined by TESTFN if non-nil or by `equal' if nil." (seq-some (lambda (e) - (funcall (or testfn #'equal) elt e)) - seq)) + (funcall (or testfn #'equal) elt e)) + seq)) (cl-defgeneric seq-uniq (seq &optional testfn) "Return a list of the elements of SEQ with duplicates removed. diff --git a/test/automated/seq-tests.el b/test/automated/seq-tests.el index efbb90d..07a183d 100644 --- a/test/automated/seq-tests.el +++ b/test/automated/seq-tests.el @@ -131,11 +131,12 @@ Evaluate BODY for each created sequence. (ert-deftest test-seq-some () (with-test-sequences (seq '(4 3 2 1)) - (should (= (seq-some #'test-sequences-evenp seq) 4)) - (should (= (seq-some #'test-sequences-oddp seq) 3)) + (should (seq-some #'test-sequences-evenp seq)) + (should (seq-some #'test-sequences-oddp seq)) (should-not (seq-some (lambda (elt) (> elt 10)) seq))) (with-test-sequences (seq '()) - (should-not (seq-some #'test-sequences-oddp seq)))) + (should-not (seq-some #'test-sequences-oddp seq))) + (should (seq-some #'null '(1 nil 2)))) (ert-deftest test-seq-contains () (with-test-sequences (seq '(3 4 5 6)) commit c36663d866e64fcb4b0d94742009d84366e9b54f Author: Nicolas Petton Date: Sun Sep 6 00:05:52 2015 +0200 Rename seq-some-p to seq-some and seq-contains-p to seq-contains * lisp/emacs-lisp/seq.el (seq-some, seq-contains): Rename the functions without the "-p" prefix. * test/automated/seq-tests.el (test-seq-some, test-seq-contains): Update the tests accordingly. * doc/lispref/sequences.texi (Sequence Functions): Update the documentation for seq.el. diff --git a/doc/lispref/sequences.texi b/doc/lispref/sequences.texi index 12ed881..22ae995 100644 --- a/doc/lispref/sequences.texi +++ b/doc/lispref/sequences.texi @@ -557,17 +557,17 @@ calling @var{function}. @end example @end defun -@defun seq-some-p predicate sequence +@defun seq-some predicate sequence This function returns the first member of sequence for which @var{predicate} returns non-@code{nil}. @example @group -(seq-some-p #'numberp ["abc" 1 nil]) +(seq-some #'numberp ["abc" 1 nil]) @result{} 1 @end group @group -(seq-some-p #'numberp ["abc" "def"]) +(seq-some #'numberp ["abc" "def"]) @result{} nil @end group @end example @@ -583,7 +583,7 @@ to every element of @var{sequence} returns non-@code{nil}. @result{} t @end group @group -(seq-some-p #'numberp [2 4 "6"]) +(seq-some #'numberp [2 4 "6"]) @result{} nil @end group @end example @@ -621,18 +621,18 @@ according to @var{function}, a function of two arguments that returns non-@code{nil} if the first argument should sort before the second. @end defun -@defun seq-contains-p sequence elt &optional function +@defun seq-contains sequence elt &optional function This function returns the first element in @var{sequence} that is equal to @var{elt}. If the optional argument @var{function} is non-@code{nil}, it is a function of two arguments to use instead of the default @code{equal}. @example @group -(seq-contains-p '(symbol1 symbol2) 'symbol1) +(seq-contains '(symbol1 symbol2) 'symbol1) @result{} symbol1 @end group @group -(seq-contains-p '(symbol1 symbol2) 'symbol3) +(seq-contains '(symbol1 symbol2) 'symbol3) @result{} nil @end group @end example diff --git a/lisp/emacs-lisp/seq.el b/lisp/emacs-lisp/seq.el index a17b0a8..bf5495b 100644 --- a/lisp/emacs-lisp/seq.el +++ b/lisp/emacs-lisp/seq.el @@ -252,14 +252,6 @@ If SEQ is empty, return INITIAL-VALUE and FUNCTION is not called." (setq acc (funcall function acc elt))) acc))) -(cl-defgeneric seq-some-p (pred seq) - "Return any element for which (PRED element) is non-nil in SEQ, nil otherwise." - (catch 'seq--break - (seq-doseq (elt seq) - (when (funcall pred elt) - (throw 'seq--break elt))) - nil)) - (cl-defgeneric seq-every-p (pred seq) "Return non-nil if (PRED element) is non-nil for all elements of the sequence SEQ." (catch 'seq--break @@ -268,6 +260,14 @@ If SEQ is empty, return INITIAL-VALUE and FUNCTION is not called." (throw 'seq--break nil))) t)) +(cl-defgeneric seq-some (pred seq) + "Return any element for which (PRED element) is non-nil in SEQ, nil otherwise." + (catch 'seq--break + (seq-doseq (elt seq) + (when (funcall pred elt) + (throw 'seq--break elt))) + nil)) + (cl-defgeneric seq-count (pred seq) "Return the number of elements for which (PRED element) is non-nil in SEQ." (let ((count 0)) @@ -276,10 +276,10 @@ If SEQ is empty, return INITIAL-VALUE and FUNCTION is not called." (setq count (+ 1 count)))) count)) -(cl-defgeneric seq-contains-p (seq elt &optional testfn) +(cl-defgeneric seq-contains (seq elt &optional testfn) "Return the first element in SEQ that equals to ELT. Equality is defined by TESTFN if non-nil or by `equal' if nil." - (seq-some-p (lambda (e) + (seq-some (lambda (e) (funcall (or testfn #'equal) elt e)) seq)) @@ -288,7 +288,7 @@ Equality is defined by TESTFN if non-nil or by `equal' if nil." TESTFN is used to compare elements, or `equal' if TESTFN is nil." (let ((result '())) (seq-doseq (elt seq) - (unless (seq-contains-p result elt testfn) + (unless (seq-contains result elt testfn) (setq result (cons elt result)))) (nreverse result))) @@ -313,7 +313,7 @@ negative integer or 0, nil is returned." "Return a list of the elements that appear in both SEQ1 and SEQ2. Equality is defined by TESTFN if non-nil or by `equal' if nil." (seq-reduce (lambda (acc elt) - (if (seq-contains-p seq2 elt testfn) + (if (seq-contains seq2 elt testfn) (cons elt acc) acc)) (seq-reverse seq1) @@ -323,7 +323,7 @@ Equality is defined by TESTFN if non-nil or by `equal' if nil." "Return a list of the elements that appear in SEQ1 but not in SEQ2. Equality is defined by TESTFN if non-nil or by `equal' if nil." (seq-reduce (lambda (acc elt) - (if (not (seq-contains-p seq2 elt testfn)) + (if (not (seq-contains seq2 elt testfn)) (cons elt acc) acc)) (seq-reverse seq1) diff --git a/test/automated/seq-tests.el b/test/automated/seq-tests.el index 482daee..efbb90d 100644 --- a/test/automated/seq-tests.el +++ b/test/automated/seq-tests.el @@ -129,21 +129,21 @@ Evaluate BODY for each created sequence. (should (eq (seq-reduce #'+ seq 0) 0)) (should (eq (seq-reduce #'+ seq 7) 7)))) -(ert-deftest test-seq-some-p () +(ert-deftest test-seq-some () (with-test-sequences (seq '(4 3 2 1)) - (should (= (seq-some-p #'test-sequences-evenp seq) 4)) - (should (= (seq-some-p #'test-sequences-oddp seq) 3)) - (should-not (seq-some-p (lambda (elt) (> elt 10)) seq))) + (should (= (seq-some #'test-sequences-evenp seq) 4)) + (should (= (seq-some #'test-sequences-oddp seq) 3)) + (should-not (seq-some (lambda (elt) (> elt 10)) seq))) (with-test-sequences (seq '()) - (should-not (seq-some-p #'test-sequences-oddp seq)))) + (should-not (seq-some #'test-sequences-oddp seq)))) -(ert-deftest test-seq-contains-p () +(ert-deftest test-seq-contains () (with-test-sequences (seq '(3 4 5 6)) - (should (seq-contains-p seq 3)) - (should-not (seq-contains-p seq 7))) + (should (seq-contains seq 3)) + (should-not (seq-contains seq 7))) (with-test-sequences (seq '()) - (should-not (seq-contains-p seq 3)) - (should-not (seq-contains-p seq nil)))) + (should-not (seq-contains seq 3)) + (should-not (seq-contains seq nil)))) (ert-deftest test-seq-every-p () (with-test-sequences (seq '(43 54 22 1)) commit b8147621ec91e1ce8e34d55141bb75921dbfc080 Author: Paul Eggert Date: Sat Sep 5 11:28:54 2015 -0700 text-quoting-style for usage of fn names with ‘’ * lisp/help.el (help--docstring-quote): Don’t assume text-quoting-style is ‘curve’ when generating usage strings for functions whose names contain curved quotes. diff --git a/lisp/help.el b/lisp/help.el index 2fcb52e..d9b0e18 100644 --- a/lisp/help.el +++ b/lisp/help.el @@ -1353,7 +1353,7 @@ the help window if the current value of the user option (defun help--docstring-quote (string) "Return a doc string that represents STRING. The result, when formatted by ‘substitute-command-keys’, should equal STRING." - (replace-regexp-in-string "['\\`]" "\\\\=\\&" string)) + (replace-regexp-in-string "['\\`‘’]" "\\\\=\\&" string)) ;; The following functions used to be in help-fns.el, which is not preloaded. ;; But for various reasons, they are more widely needed, so they were commit b6b2554f8b9fefe9242b5dbd34211b3ff44a5a65 Author: Paul Eggert Date: Sat Sep 5 11:22:29 2015 -0700 Fix fix for describe-function keybinding confusion This fixes a bug introduced by the previous patch. * lisp/help-fns.el (help-fns--signature): Last arg of help-fns--signature is now a buffer, or nil if a raw signature is wanted. All callers changed. (describe-function-1): Use this to do the right thing with signatures. diff --git a/lisp/emacs-lisp/pcase.el b/lisp/emacs-lisp/pcase.el index 5fe36bb..c7f0784 100644 --- a/lisp/emacs-lisp/pcase.el +++ b/lisp/emacs-lisp/pcase.el @@ -164,7 +164,7 @@ Currently, the following patterns are provided this way:" expansion)))) (declare-function help-fns--signature "help-fns" - (function doc real-def real-function raw)) + (function doc real-def real-function buffer)) ;; FIXME: Obviously, this will collide with nadvice's use of ;; function-documentation if we happen to advise `pcase'. @@ -184,7 +184,7 @@ Currently, the following patterns are provided this way:" (insert "\n\n-- ") (let* ((doc (documentation me 'raw))) (setq doc (help-fns--signature symbol doc me - (indirect-function me) t)) + (indirect-function me) nil)) (insert "\n" (or doc "Not documented."))))))) (let ((combined-doc (buffer-string))) (if ud (help-add-fundoc-usage combined-doc (car ud)) combined-doc))))) diff --git a/lisp/help-fns.el b/lisp/help-fns.el index f5c7eb3..b247c5b 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -368,7 +368,7 @@ suitable file is found, return nil." (help-xref-button 1 'help-function-cmacro function lib))))) (insert ".\n")))) -(defun help-fns--signature (function doc real-def real-function raw) +(defun help-fns--signature (function doc real-def real-function buffer) "Insert usage at point and return docstring. With highlighting." (if (keymapp function) doc ; If definition is a keymap, skip arglist note. @@ -402,10 +402,13 @@ suitable file is found, return nil." (use1 (replace-regexp-in-string "\\`(\\\\=\\\\\\\\=` \\([^\n ]*\\))\\'" "\\\\=`\\1" use t)) - (high (if raw - (cons use1 doc) - (help-highlight-arguments (substitute-command-keys use1) - (substitute-command-keys doc))))) + (high (if buffer + (let (subst-use1 subst-doc) + (with-current-buffer buffer + (setq subst-use1 (substitute-command-keys use1)) + (setq subst-doc (substitute-command-keys doc))) + (help-highlight-arguments subst-use1 subst-doc)) + (cons use1 doc)))) (let ((fill-begin (point)) (high-usage (car high)) (high-doc (cdr high))) @@ -604,7 +607,8 @@ FILE is the file where FUNCTION was probably defined." (point))) (terpri)(terpri) - (let ((doc-raw (documentation function t))) + (let ((doc-raw (documentation function t)) + (key-bindings-buffer (current-buffer))) ;; If the function is autoloaded, and its docstring has ;; key substitution constructs, load the library. @@ -614,12 +618,12 @@ FILE is the file where FUNCTION was probably defined." (autoload-do-load real-def)) (help-fns--key-bindings function) - (let ((doc (help-fns--signature function doc-raw sig-key - real-function nil))) - (with-current-buffer standard-output - (run-hook-with-args 'help-fns-describe-function-functions function) - (insert "\n" - (or doc "Not documented.")))))))) + (with-current-buffer standard-output + (let ((doc (help-fns--signature function doc-raw sig-key + real-function key-bindings-buffer))) + (run-hook-with-args 'help-fns-describe-function-functions function) + (insert "\n" + (or doc "Not documented.")))))))) ;; Add defaults to `help-fns-describe-function-functions'. (add-hook 'help-fns-describe-function-functions #'help-fns--obsolete) commit ba521e7029ef2893a135ebec8cc472f3d45bf668 Author: Johan Bockgård Date: Sat Sep 5 20:02:37 2015 +0200 * doc/lispref/frames.texi (Mouse Tracking): Fix typo. diff --git a/doc/lispref/frames.texi b/doc/lispref/frames.texi index 65eeec6..16fc495 100644 --- a/doc/lispref/frames.texi +++ b/doc/lispref/frames.texi @@ -2256,7 +2256,7 @@ indicates the release of the button, or whatever kind of event means it is time to stop tracking. The @code{track-mouse} form causes Emacs to generate mouse motion -events by binding the variable @code{mouse-tracking} to a +events by binding the variable @code{track-mouse} to a non-@code{nil} value. If that variable has the special value @code{dragging}, it additionally instructs the display engine to refrain from changing the shape of the mouse pointer. This is commit 96d6689d3c9b7ed3ea791c6a6c0345e89ba209f9 Author: Johan Bockgård Date: Sat Sep 5 17:10:50 2015 +0200 Use PAT rather than UPAT in pcase macros * lisp/emacs-lisp/cl-macs.el (cl-struct) : * lisp/emacs-lisp/eieio.el (eieio) : Use PAT rather than UPAT. diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index 06e75b3..30581e3 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el @@ -2777,10 +2777,10 @@ non-nil value, that slot cannot be set via `setf'. ;;;###autoload (pcase-defmacro cl-struct (type &rest fields) "Pcase patterns to match cl-structs. -Elements of FIELDS can be of the form (NAME UPAT) in which case the contents of -field NAME is matched against UPAT, or they can be of the form NAME which +Elements of FIELDS can be of the form (NAME PAT) in which case the contents of +field NAME is matched against PAT, or they can be of the form NAME which is a shorthand for (NAME NAME)." - (declare (debug (sexp &rest [&or (sexp pcase-UPAT) sexp]))) + (declare (debug (sexp &rest [&or (sexp pcase-PAT) sexp]))) `(and (pred (pcase--flip cl-typep ',type)) ,@(mapcar (lambda (field) diff --git a/lisp/emacs-lisp/eieio.el b/lisp/emacs-lisp/eieio.el index 2320300..d6c27be 100644 --- a/lisp/emacs-lisp/eieio.el +++ b/lisp/emacs-lisp/eieio.el @@ -349,10 +349,10 @@ variable name of the same name as the slot." (pcase-defmacro eieio (&rest fields) "Pcase patterns to match EIEIO objects. -Elements of FIELDS can be of the form (NAME UPAT) in which case the contents of -field NAME is matched against UPAT, or they can be of the form NAME which +Elements of FIELDS can be of the form (NAME PAT) in which case the contents of +field NAME is matched against PAT, or they can be of the form NAME which is a shorthand for (NAME NAME)." - (declare (debug (&rest [&or (sexp pcase-UPAT) sexp]))) + (declare (debug (&rest [&or (sexp pcase-PAT) sexp]))) (let ((is (make-symbol "table"))) ;; FIXME: This generates a horrendous mess of redundant let bindings. ;; `pcase' needs to be improved somehow to introduce let-bindings more commit 6d2a3ca2fc60d89a2454a0ee6cd4e814801e4e39 Author: Paul Eggert Date: Sat Sep 5 08:50:34 2015 -0700 Fix describe-function keybinding confusion * lisp/help-fns.el (describe-function-1): Compute signature in the original buffer, not in standard-output, so that substitute-command-keys uses the proper keybindings. This fixes Bug#21412, introduced in commit 2015-06-11T10:23:46-0700!eggert@cs.ucla.edu. diff --git a/lisp/help-fns.el b/lisp/help-fns.el index a1d121c..f5c7eb3 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -614,9 +614,9 @@ FILE is the file where FUNCTION was probably defined." (autoload-do-load real-def)) (help-fns--key-bindings function) - (with-current-buffer standard-output - (let ((doc (help-fns--signature function doc-raw sig-key - real-function nil))) + (let ((doc (help-fns--signature function doc-raw sig-key + real-function nil))) + (with-current-buffer standard-output (run-hook-with-args 'help-fns-describe-function-functions function) (insert "\n" (or doc "Not documented.")))))))) commit dfc8f093f30e84a76a1f0abd039e26cc7b0b6fbb Author: Xue Fuqiao Date: Sat Sep 5 20:24:56 2015 +0800 * doc/emacs/programs.texi (Program Modes): Remove an index entry. diff --git a/doc/emacs/programs.texi b/doc/emacs/programs.texi index 8f78a1a..ea8f82f 100644 --- a/doc/emacs/programs.texi +++ b/doc/emacs/programs.texi @@ -97,7 +97,6 @@ your favorite language, the mode might be implemented in a package not distributed with Emacs (@pxref{Packages}); or you can contribute one. @kindex DEL @r{(programming modes)} -@findex c-electric-backspace @findex backward-delete-char-untabify In most programming languages, indentation should vary from line to line to illustrate the structure of the program. Therefore, in most commit 2330ca33a97867f2ea1123bcf7bfe5cfcc030b36 Author: Eli Zaretskii Date: Sat Sep 5 12:02:47 2015 +0300 ; ChangeLog.2: Fix last entry diff --git a/ChangeLog.2 b/ChangeLog.2 index 4cad648..fa5795c 100644 --- a/ChangeLog.2 +++ b/ChangeLog.2 @@ -1,4 +1,4 @@ -2015-09-05 Robert Pluim +2015-09-05 Robert Pluim (tiny change) Avoid read error messages from 'inotify' * src/process.c (wait_reading_process_output): Add a commit f65de05710b7f2ef406abc6f5f827beac267dbc2 Author: Eli Zaretskii Date: Sat Sep 5 05:00:51 2015 -0400 ; make change-history-commit diff --git a/ChangeLog.2 b/ChangeLog.2 index 856cb58..4cad648 100644 --- a/ChangeLog.2 +++ b/ChangeLog.2 @@ -1,3 +1,559 @@ +2015-09-05 Robert Pluim + + Avoid read error messages from 'inotify' + * src/process.c (wait_reading_process_output): Add a + 'tls_available' set and manipulate it instead of 'Available' when + checking TLS inputs. Assign the value to 'Available' only if we + find any TLS data waiting to be read. This avoids error messages + from 'inotify' that tries to read data it shouldn't. (Bug#21337) + +2015-09-05 Eli Zaretskii + + Avoid errors in thing-at-point with 2nd argument non-nil + * lisp/thingatpt.el (thing-at-point): Only call 'length' on + sequences. (Bug#21391) + +2015-09-05 Philip (tiny change) + + Fix segfaults due to using a stale face ID + * src/xdisp.c (forget_escape_and_glyphless_faces): New function. + (display_echo_area_1, redisplay_internal): Call it to avoid + reusing stale face IDs for 'escape-glyph' and 'glyphless-char' + faces, which could case a segfault if the frame's face cache was + freed since the last redisplay. (Bug#21394) + * src/xfaces.c (free_realized_faces): Call forget_escape_and_glyphless_faces. + * src/dispextern.h (forget_escape_and_glyphless_faces): Add prototype. + +2015-09-04 Paul Eggert + + Fix minor problems with " in manual + +2015-09-04 Michael Albinus + + * doc/misc/tramp.texi (Frequently Asked Questions): New item for ad-hoc + multi-hop files. + +2015-09-04 Paul Eggert + + Support automated ‘make check’ in non-C locale + This lets the builder optionally test Emacs behavior in other locales. + The C locale is still the default for tests. + * test/automated/Makefile.in (TEST_LOCALE): New macro. + (emacs): Use it. + * test/automated/flymake-tests.el (flymake-tests--current-face): + Use C locale for subprocesses so that tests behave as expected. + * test/automated/python-tests.el: + (python-shell-prompt-validate-regexps-1) + (python-shell-prompt-validate-regexps-2) + (python-shell-prompt-validate-regexps-3) + (python-shell-prompt-validate-regexps-4) + (python-shell-prompt-validate-regexps-5) + (python-shell-prompt-validate-regexps-6) + (python-shell-prompt-set-calculated-regexps-1): + Adjust expected output to match locale. + * test/automated/tildify-tests.el (tildify-test--test) + (tildify-space-test--test, tildify-space-undo-test--test): + This test assumes UTF-8 encoding. + +2015-09-03 Paul Eggert + + Fix some more docstring etc. quoting problems + Mostly these fixes prevent the transliteration of apostrophes + that should stay apostrophes. Also, prefer curved quotes in + Bahá’í proper names, as that’s the preferred Bahá’í style and + these names are chock-full of non-ASCII characters anyway. + * lisp/emacs-lisp/eieio-core.el (eieio-defclass-autoload) + (eieio-defclass-internal): + * lisp/emacs-lisp/eieio.el (defclass): + * lisp/hi-lock.el (hi-lock-mode): + Don’t transliterate Lisp apostrophes when generating a + doc string or diagnostic. + * lisp/international/mule-diag.el (list-coding-systems-1): + * lisp/international/ogonek.el (ogonek-jak, ogonek-how): + * lisp/mail/sendmail.el (sendmail-query-user-about-smtp): + * lisp/vc/ediff-mult.el (ediff-redraw-registry-buffer): + * lisp/vc/ediff-ptch.el (ediff-fixup-patch-map): + Substitute quotes before putting them in the help buffer. + +2015-09-03 Stefan Monnier + + Re-add the notion of echo_prompt lost in the translation + * src/keyboard.h (struct kboard): Replace echo_after_prompt with new + echo_prompt which contains the actual string. Update all uses. + * src/keyboard.c (kset_echo_prompt): New function. + (echo_update): Add echo_prompt at the very beginning. + (read_char): Remove workaround for bug#19875, not needed any more. + (read_key_sequence): Set echo_prompt rather than echo_string (bug#21403). + (mark_kboards): Mark echo_prompt. + + Fix disassembly of non-compiled lexical functions (bug#21377) + * lisp/emacs-lisp/bytecomp.el (byte-compile): Handle `closure' arg. + * lisp/emacs-lisp/disass.el: Use lexical-binding. + (disassemble): Recognize `closure's as well. + (disassemble-internal): Use indirect-function and + help-function-arglist, and accept `closure's. + (disassemble-internal): Use interactive-form. + (disassemble-1): Use functionp. + + (tex--prettify-symbols-compose-p): Don't compose in verbatim blocks! + * lisp/textmodes/tex-mode.el (tex--prettify-symbols-compose-p): + Don't compose inside verbatim blocks! + +2015-09-03 Mark Oteiza + + * lisp/thingatpt.el (thing-at-point-uri-schemes): Add "man:" + (bug#19441) + + * lisp/mpc.el (mpc--proc-connect): Handle unix sockets (bug#19394) + +2015-09-03 Dmitry Gutov + + vc-git-mode-line-string: Explicitly re-apply the face + * lisp/vc/vc-git.el (vc-git-mode-line-string): Explicitly re-apply + the face (bug#21404). + +2015-09-02 Paul Eggert + + Treat initial-scratch-message as a doc string + * doc/emacs/building.texi (Lisp Interaction): + * doc/lispref/os.texi (Startup Summary): + * etc/NEWS: Document this. + * lisp/startup.el (initial-scratch-message): + Look up find-file’s key rather than hardcoding it. + (command-line-1): Substitute the doc string. + This also substitutes the quotes, which will help test display + quoting at startup. + + Fix describe-char bug with glyphs on terminals + * lisp/descr-text.el (describe-char): Terminals can have glyphs in + buffers too, so don’t treat them differently from graphic displays. + Without this fix, describe-char would throw an error on a terminal + if given a glyph with a non-default face. + + Follow text-quoting-style in display table init + This attempts to fix a problem reported by Alan Mackenzie in: + http://lists.gnu.org/archive/html/emacs-devel/2015-09/msg00112.html + * doc/lispref/display.texi (Active Display Table): + Mention how text-quoting-style affects it. + * doc/lispref/help.texi (Keys in Documentation): + Say how to set text-quoting-style in ~/.emacs. + * etc/NEWS: Document the change. + * lisp/startup.el (startup--setup-quote-display): + Follow user preference if text-quoting-style is set. + (command-line): Setup quote display again if user expresses + a preference in .emacs. + +2015-09-02 K. Handa + + Fix typo + * ftfont.c (ftfont_drive_otf): otf_positioning_type_components_mask -> OTF_positioning_type_components_mask. + + fix previous change + * ftfont.c (ftfont_drive_otf): Remember some bits of + OTF_Glyph->positioning_type in MFLTGlyphFT->libotf_positioning_type. + +2015-09-01 David Caldwell (tiny change) + + * lisp/vc/vc-hooks.el (vc-refresh-state): New command + (vc-refresh-state): Rename from vc-find-file-hook and make interactive. + (vc-find-file-hook): Redefine as obsolete alias. + +2015-09-01 Paul Eggert + + Escape ` and ' in doc + Escape apostrophes and grave accents in docstrings if they are + are supposed to stand for themselves and are not quotes. Remove + apostrophes from docstring examples like ‘'(calendar-nth-named-day + -1 0 10 year)’ that confuse source code with data. Do some other + minor docstring fixups as well, e.g., insert a missing close + quote. + +2015-09-01 Stefan Monnier + + Generalize the prefix-command machinery of C-u + * lisp/simple.el (prefix-command-echo-keystrokes-functions) + (prefix-command-preserve-state-hook): New hooks. + (internal-echo-keystrokes-prefix): New function. + (prefix-command--needs-update, prefix-command--last-echo): New vars. + (prefix-command-update, prefix-command-preserve): New functions. + (reset-this-command-lengths): New compatibility definition. + (universal-argument--mode): Call prefix-command-update. + (universal-argument, universal-argument-more, negative-argument) + (digit-argument): Call prefix-command-preserve-state. + * src/keyboard.c: Call internal-echo-keystrokes-prefix to build + the "prefix argument" to echo. + (this_command_key_count_reset, before_command_key_count) + (before_command_echo_length): Delete variables. + (echo_add_key): Always add a space. + (echo_char): Remove. + (echo_dash): Don't give up when this_command_key_count is 0, since that + is now the case after a prefix command. + (echo_update): New function, extracted from echo_now. + (echo_now): Use it. + (add_command_key, read_char, record_menu_key): Remove old disabled code. + (command_loop_1): Don't refrain from pushing an undo boundary when + prefix-arg is set. Remove other prefix-arg special case, now handled + directly in the prefix commands instead. But call echo_now if there's + a prefix state to echo. + (read_char, record_menu_key): Use echo_update instead of echo_char. + (read_key_sequence): Use echo_now rather than echo_dash/echo_char. + (Freset_this_command_lengths): Delete function. + (syms_of_keyboard): Define Qinternal_echo_keystrokes_prefix. + (syms_of_keyboard): Don't defsubr Sreset_this_command_lengths. + * lisp/simple.el: Use those new hooks for C-u. + (universal-argument--description): New function. + (prefix-command-echo-keystrokes-functions): Use it. + (universal-argument--preserve): New function. + (prefix-command-preserve-state-hook): Use it. + (command-execute): Call prefix-command-update if needed. + * lisp/kmacro.el (kmacro-step-edit-prefix-commands) + (kmacro-step-edit-prefix-index): Delete variables. + (kmacro-step-edit-query, kmacro-step-edit-insert): Remove ad-hoc + support for prefix arg commands. + (kmacro-step-edit-macro): Don't bind kmacro-step-edit-prefix-index. + * lisp/emulation/cua-base.el (cua--prefix-override-replay) + (cua--shift-control-prefix): Use prefix-command-preserve-state. + Remove now unused arg `arg'. + (cua--prefix-override-handler, cua--prefix-repeat-handler) + (cua--shift-control-c-prefix, cua--shift-control-x-prefix): + Update accordingly. + (cua--prefix-override-timeout): Don't call reset-this-command-lengths + any more. + (cua--keep-active, cua-exchange-point-and-mark): Don't set mark-active + if the mark is not set. + +2015-09-01 Paul Eggert + + Rework quoting in tutorial + * doc/lispintro/emacs-lisp-intro.texi (Sample let Expression) + (if in more detail, type-of-animal in detail, else): Rework the + early example to use " rather than ' so that we don’t burden + complete novices with the low-priority detail of text quoting style. + (Complete zap-to-char, kill-region, Complete copy-region-as-kill) + (kill-new function, kill-ring-yank-pointer) + (Complete forward-sentence, Loading Files) + (Code for current-kill, Code for current-kill, yank): + Resurrect the Emacs 22 versions of the code, which uses grave + quoting style in doc strings. + (Complete zap-to-char): Mention how quoting works in doc strings. + + Setup quote display only if interactive + * lisp/startup.el (command-line): + Skip call to startup--setup-quote-display if noninteractive. + Without this change, python-shell-prompt-validate-regexps-1 + fails in test/automated/python-tests.el when run in an + en_US.utf8 locale on Fedora. + +2015-09-01 Katsumi Yamaoka + + Use defalias at the top level + * lisp/gnus/gnus-util.el (gnus-format-message): + * lisp/net/tls.el (tls-format-message): Use defalias at the top level + so as to make eval-and-compile unnecessary. Thanks to Stefan Monnier. + +2015-09-01 Paul Eggert + + terminal-init-w32console mimicks command-line + Problem reported by Eli Zaretskii. + * lisp/startup.el (startup--setup-quote-display): + New function, refactored from a part of ‘command-line’. + (command-line): Use it. + * lisp/term/w32console.el (terminal-init-w32console): + Use it, so that this function stays consistent with ‘command-line’. + + Display replacement quotes with shadow glyphs + * lisp/startup.el (command-line): When displaying ASCII + replacements for curved quotes, use a shadow glyph instead of a + regular one, to avoid ambiguity. + +2015-09-01 Michael Albinus + + * lisp/net/tramp-sh.el (tramp-methods) : Mask "Password:". + +2015-09-01 Paul Eggert + + Docstring fixes re quotes in C code + Fix some docstring quoting problems, mostly by escaping apostrophe. + +2015-09-01 Michael Albinus + + Some Tramp password fixes + * lisp/net/tramp.el (tramp-clear-passwd): Clear also the passwords + of the hops. + * lisp/net/tramp-sh.el (tramp-methods) : Move "-p" "Password:" + at the beginning of the command. Otherwise, it could be + interpreted as password prompt if the remote host echoes the + command. + (tramp-remote-coding-commands): Add "openssl enc -base64". + +2015-09-01 Dmitry Gutov + + Make vc-git-working-revision always return the commit hash + * lisp/vc/vc-git.el (vc-git-working-revision): + Return the commit hash (bug#21383). + (vc-git--symbolic-ref): New function, extracted from above. + (vc-git-mode-line-string): Use it. + +2015-09-01 K. Handa + + Use the new type MFLTGlyphFT for MFLTGlyphString.glyphs. + * ftfont.c (MFLTGlyphFT): New type. + (ftfont_get_glyph_id, ftfont_get_metrics, ftfont_drive_otf) + (ftfont_shape_by_flt): Make MFLTGlyphFT the actual type of + elements in the array MFLTGlyphString.glyphs. + +2015-09-01 Stephen Leake + + Improve comments in elisp-mode.el, elisp-mode-tests.el + * lisp/progmodes/elisp-mode.el: Clean up FIXMEs, comments. + + Delete Emacs 25 test in mode-local.el + * lisp/cedet/mode-local.el (describe-mode-local-overload): Fix missed an + edit in previous commit. + + Show all known mode-local overrides in *Help* + * lisp/cedet/mode-local.el (describe-mode-local-overload): Assume Emacs + 25. Add all known mode-local overrides. + +2015-09-01 Katsumi Yamaoka + + * lisp/gnus/gnus-sum.el (gnus-summary-search-article): + Ensure that the article where the search word is found is displayed + and pointed to in the summary buffer. + +2015-08-31 Zachary Kanfer + + * lisp/newcomment.el (comment-dwim): Use `use-region-p' + When the region is active, but is empty (length 0), act as though + the region was not active; that is, put a comment at the end of + the line. (Bug#21119) + +2015-08-31 Katsumi Yamaoka + + Port tls.el to older Emacs + * lisp/net/tls.el (tls-format-message): + Alias to format-message, or format if not available. + (open-tls-stream): Use it. + +2015-08-31 Rüdiger Sonderfeld + + hideif.el: Recognize .h++ as C++ header. + * lisp/progmodes/hideif.el (hide-ifdef-header-regexp): Add .h++. + + isearch: Document character folding mode. + * isearch.el (isearch-forward): Mention `isearch-toggle-character-fold' + in docstring. + +2015-08-31 Paul Eggert + + Quoting fixes in ERC and Eshell + * lisp/erc/erc-autoaway.el (erc-autoaway-set-away): + * lisp/erc/erc-backend.el (define-erc-response-handler): + * lisp/erc/erc-fill.el (erc-fill-static-center): + * lisp/eshell/em-dirs.el (eshell-save-some-last-dir): + * lisp/eshell/em-glob.el (eshell-glob-entries): + * lisp/eshell/em-hist.el (eshell-save-some-history): + * lisp/eshell/em-unix.el (eshell-remove-entries, eshell/rm) + (eshell-shuffle-files): + * lisp/eshell/esh-cmd.el (eshell-do-eval): + * lisp/eshell/esh-proc.el (eshell-process-interact) + (eshell-query-kill-processes): + Respect ‘text-quoting-style’ in diagnostics and doc strings. + + Quoting fixes in Gnus + * lisp/gnus/gnus-agent.el: + (gnus-agent-possibly-synchronize-flags-server): + * lisp/gnus/gnus-art.el (gnus-article-browse-delete-temp-files): + * lisp/gnus/gnus-eform.el (gnus-edit-form): + * lisp/gnus/gnus-group.el (gnus-group-edit-group) + (gnus-group-nnimap-edit-acl): + * lisp/gnus/gnus-topic.el (gnus-topic-edit-parameters): + * lisp/gnus/mail-source.el (mail-source-delete-old-incoming): + * lisp/gnus/message.el (message-strip-subject-encoded-words) + (message-check-recipients, message-send-form-letter): + * lisp/gnus/mm-decode.el (mm-display-part): + * lisp/gnus/mm-uu.el (mm-uu-pgp-signed-extract-1): + * lisp/gnus/mml-smime.el (mml-smime-get-dns-cert) + (mml-smime-get-ldap-cert): + * lisp/gnus/spam-report.el (spam-report-process-queue): + Respect ‘text-quoting-style’ in diagnostics. + * lisp/gnus/gnus-art.el (article-display-face) + * lisp/gnus/gnus-fun.el (gnus-display-x-face-in-from): + Use straight quoting in email. + * lisp/gnus/rfc2231.el (rfc2231-decode-encoded-string): + Escape apostrophes in doc strings. + + Quoting fixes in lisp mail, mh-e, net, url + * lisp/mail/emacsbug.el (report-emacs-bug) + (report-emacs-bug-hook): Use straight quotes in outgoing email, + * lisp/mail/feedmail.el (feedmail-message-action-help-blat): + * lisp/mail/rmail.el (rmail-unknown-mail-followup-to): + * lisp/mail/rmailout.el (rmail-output-read-file-name): + * lisp/net/imap.el (imap-interactive-login): + * lisp/net/tls.el (open-tls-stream): + * lisp/url/url-auth.el (url-register-auth-scheme): + Respect ‘text-quoting-style’ in diagnostics. + * lisp/mh-e/mh-e.el (mh-sortm-args): + Quote docstring example using text quotes, not as a Lisp quote. + +2015-08-31 Stephen Leake + + Fix some byte-compiler warnings in EDE + This fixes a bug that caused ede-generic-new-autoloader to overwrite the + existing autoloader list, rather than add to it. + * lisp/cedet/ede/auto.el (ede-project-class-files): Delete obsolete name + argument to eieio class constructor. + (ede-show-supported-projects): New. + (ede-add-project-autoload): Replace obsolete `eieio-object-name-string' + with (oref ... name). + (ede-auto-load-project): Use slot name, not initarg key. + * lisp/cedet/ede/generic.el (ede-generic-load, + ede-generic-find-matching-target): Use slot name, not initarg key. + (ede-find-target): Use oref-default on class name. + (ede-generic-new-autoloader): Delete obsolete name argument to eieio + class constructor. + (ede-enable-generic-projects): Make project type names unique. + +2015-08-31 Eli Zaretskii + + Fix directory accessibility tests for w32 network volumes + * src/w32.c (faccessat): Don't fail with network volumes without a + share. + (w32_accessible_directory_p): Handle network volumes without a + share. + + Fix handling long file names in readdir on MS-Windows + * src/w32.c (sys_readdir): Append "\*" to the directory after + converting it to UTF-16/ANSI, not before, to avoid overflowing the + 260-character limit on file names in filename_to_utf16/ansi. + + Make file-accessible-directory-p reliable on MS-Windows + * src/w32.c (w32_accessible_directory_p): New function. + * src/w32.h (w32_accessible_directory_p): Add prototype. + * src/fileio.c (file_accessible_directory_p) [WINDOWSNT]: Call + w32_accessible_directory_p to test a directory for accessibility + by the current user. (Bug#21346) + (Ffile_accessible_directory_p): Remove the w32 specific caveat + from the doc string. + +2015-08-31 Martin Rudalics + + Don't call do_pending_window_change in signal handlers (Bug#21380) + * src/gtkutil.c (xg_frame_resized): + * src/xterm.c (x_set_window_size): + * src/w32term.c (x_set_window_size): Don't call + do_pending_window_change. + +2015-08-31 Paul Eggert + + Quoting fixes in lisp/org + * lisp/org/org-agenda.el (org-search-view, org-todo-list) + (org-tags-view): + * lisp/org/org-capture.el (org-capture-mode) + * lisp/org/org-ctags.el (org-ctags-visit-buffer-or-file) + (org-ctags-ask-append-topic): + * lisp/org/org.el (org-time-string-to-time) + (org-time-string-to-absolute): + * lisp/org/org-ctags.el (org-ctags-visit-buffer-or-file) + (org-ctags-ask-append-topic): + * lisp/org/org.el (org-time-string-to-time) + (org-time-string-to-absolute): + Respect ‘text-quoting-style’ in diagnostics. + * lisp/org/org-agenda.el (org-agenda-custom-commands) + (org-agenda-dim-blocked-tasks): Plural of TODO is TODOs, not TODO’s. + * lisp/org/org-capture.el (org-capture-fill-template): + Avoid contraction in output file that might be ASCII. + * lisp/org/org-compat.el (format-message): + Define if not already defined, for backward compatibility. + * lisp/org/org-src.el (org-edit-src-save): + * lisp/org/org.el (org-cycle, org-ctrl-c-ctrl-c): + Escape apostrophes in diagnostics. + + Treat “instead” strings as docstrings + * lisp/emacs-lisp/bytecomp.el (byte-compile-form): + * lisp/emacs-lisp/macroexp.el (macroexp--obsolete-warning): + Substitute quotes in instead strings. + +2015-08-31 Nicolas Petton + + Better documentation of seq-let + * doc/lispref/sequences.texi (Sequence Functions): Rephrase the + documentation of seq-let. + +2015-08-31 Paul Eggert + + * lisp/international/ccl.el: Fix quoting. + + Quoting fixes in lisp/international and lisp/leim + * lisp/international/ccl.el (ccl-dump, ccl-dump-call): + * lisp/international/ja-dic-utl.el (skkdic-lookup-key): + * lisp/international/mule-cmds.el: + (select-safe-coding-system-interactively, leim-list-file-name): + * lisp/international/quail.el (quail-use-package, quail-help): + * lisp/international/titdic-cnv.el (tit-process-header) + (miscdic-convert): + Respect text quoting style in doc strings and diagnostics. + * lisp/international/quail.el (lisp/international/quail.el): + * lisp/leim/quail/ethiopic.el ("ethiopic"): + Escape apostrophes in doc strings. + + Make ‘text-quoting-style’ a plain defvar + It doesn’t need customization, as it’s likely useful only by experts. + Suggested by Stefan Monnier in: + http://lists.gnu.org/archive/html/emacs-devel/2015-08/msg01020.html + * lisp/cus-start.el: Remove doc.c section for builtin customized vars. + + Quoting fixes in lisp/textmodes + * lisp/textmodes/bibtex.el (bibtex-validate) + (bibtex-validate-globally, bibtex-search-entries): + * lisp/textmodes/ispell.el (ispell-command-loop): + * lisp/textmodes/page-ext.el (search-pages, pages-directory): + * lisp/textmodes/texinfmt.el (texinfmt-version) + (texinfo-format-region, texinfo-format-buffer-1): + * lisp/textmodes/two-column.el (2C-split): + Respect text quoting style in doc strings and diagnostics. + * lisp/textmodes/conf-mode.el (conf-mode-map, conf-quote-normal): + * lisp/textmodes/sgml-mode.el (sgml-specials, sgml-mode): + Escape apostrophes in doc strings. + + Documentation fixes re quotes + Prefer curved quotes in examples if users will typically see + curved quotes when the examples run. + Mention format-message when appropriate. + Don’t use @code in examples. + Quote an apostrophe with @kbd. + + Quoting fixes in lisp/progmodes + * lisp/progmodes/cc-engine.el (c-bos-report-error): + * lisp/progmodes/cpp.el (cpp-edit-reset): + * lisp/progmodes/ebrowse.el (ebrowse-tags-apropos): + * lisp/progmodes/etags.el (etags-tags-apropos-additional) + (etags-tags-apropos, list-tags, tags-apropos): + * lisp/progmodes/executable.el (executable-set-magic): + * lisp/progmodes/octave.el (octave-sync-function-file-names) + (octave-help, octave-find-definition-default-filename) + (octave-find-definition): + Respect text quoting style in doc strings and diagnostics. + * lisp/progmodes/cc-langs.el (c-populate-syntax-table): + * lisp/progmodes/verilog-mode.el (verilog-auto-reset-widths): + * lisp/progmodes/vhdl-mode.el (vhdl-electric-quote): + Escape apostrophes in doc strings. + * lisp/progmodes/cmacexp.el (c-macro-expansion): + Use straight quoting in ASCII comment. + * lisp/progmodes/idlwave.el (idlwave-auto-fill-split-string) + (idlwave-pad-keyword): + * lisp/progmodes/vhdl-mode.el (vhdl-widget-directory-validate) + (vhdl-electric-open-bracket, vhdl-electric-close-bracket): + (vhdl-electric-semicolon, vhdl-electric-comma) + (vhdl-electric-period, vhdl-electric-equal): + Use directed quotes in diagnostics and doc strings. + +2015-08-30 Xue Fuqiao + + Minor documentation and NEWS tweak + * doc/lispintro/emacs-lisp-intro.texi (fwd-para let): Add an index + entry. + 2015-08-30 Michael Albinus * lisp/net/tramp-sh.el (tramp-convert-file-attributes): @@ -11395,7 +11951,7 @@ This file records repository revisions from commit 9d56a21e6a696ad19ac65c4b405aeca44785884a (exclusive) to -commit cc90c25a50e536669ac327f7e05ec9194d1650d0 (inclusive). +commit ac9da241986b747c1122ad5d097db42795eb9737 (inclusive). See ChangeLog.1 for earlier changes. ;; Local Variables: