aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorJohn Wiegley2016-02-15 14:11:03 -0800
committerJohn Wiegley2016-02-15 14:11:03 -0800
commit220613e089ec012ae4ab319637365132ce8dc306 (patch)
tree715595598dfd3d80ba7c4306a0ea8f010b320db4 /lisp
parentca03b85b9c1b8908f2651eaf594780c7b5217f61 (diff)
parentd4b93e11a519cf71beca69654fda158d01a26c3b (diff)
downloademacs-220613e089ec012ae4ab319637365132ce8dc306.tar.gz
emacs-220613e089ec012ae4ab319637365132ce8dc306.zip
Merge from origin/emacs-25
d4b93e1 Minor fixes in global-auto-composition-mode 02b037b Allow arithmetic operators inside C++ template constructs. 44b16f6 Avoid crashes in semi-malformed 'condition-case' 652e5b4 Allow arithmetic operators inside C++ template constructs. d9ea795 Fix regression with 'recent-keys' and keyboard macros 903603f Fix wording in a doc-view.el comment cf79616 ; Spelling fixes f8bf1b3 CONTRIBUTE cleanups and updates f3aaca3 Port USE_STACK_LISP_OBJECTS fix to Clang 1834ac7 Port to x86 GCC 4.3.1 and earlier 8482949 Fix point movement under 'scroll-conservatively' c1313b5 Replace colon in file name (not legal on Windows) f7af26c Fix a typo in edt.texi 8badf95 Make 'mmap_realloc' on MS-Windows more reliable 856cd94 Grep alias `all' shall not match parent directory
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog.132
-rw-r--r--lisp/ChangeLog.172
-rw-r--r--lisp/composite.el1
-rw-r--r--lisp/doc-view.el22
-rw-r--r--lisp/emacs-lisp/easy-mmode.el1
-rw-r--r--lisp/gnus/ChangeLog.36
-rw-r--r--lisp/progmodes/cc-engine.el14
-rw-r--r--lisp/progmodes/cc-langs.el33
-rw-r--r--lisp/progmodes/grep.el2
9 files changed, 64 insertions, 19 deletions
diff --git a/lisp/ChangeLog.13 b/lisp/ChangeLog.13
index 041e8c0c86b..d792889b3b7 100644
--- a/lisp/ChangeLog.13
+++ b/lisp/ChangeLog.13
@@ -7656,7 +7656,7 @@
76562007-11-07 Glenn Morris <rgm@gnu.org> 76562007-11-07 Glenn Morris <rgm@gnu.org>
7657 7657
7658 * emulation/tpu-mapper.el (tpu-map-key): Use unless rather than cond. 7658 * emulation/tpu-mapper.el (tpu-map-key): Use unless rather than cond.
7659 Remove superfluous concats. Move final set-buffer to 7659 Remove superfluous concatenations. Move final set-buffer to
7660 non-emacs-specific code. 7660 non-emacs-specific code.
7661 7661
76622007-11-07 Rob Riepel <riepel@networking.stanford.edu> 76622007-11-07 Rob Riepel <riepel@networking.stanford.edu>
diff --git a/lisp/ChangeLog.17 b/lisp/ChangeLog.17
index 1785a336732..ee03661ece0 100644
--- a/lisp/ChangeLog.17
+++ b/lisp/ChangeLog.17
@@ -1758,7 +1758,7 @@
1758 1758
1759 * net/shr.el (shr-insert): Make sure the space inserted has the 1759 * net/shr.el (shr-insert): Make sure the space inserted has the
1760 right font (for width). 1760 right font (for width).
1761 (shr-fill-line): Preserve background colours when indenting/folding. 1761 (shr-fill-line): Preserve background colors when indenting/folding.
1762 (shr-ensure-paragraph): Don't insert a new paragraph as the first 1762 (shr-ensure-paragraph): Don't insert a new paragraph as the first
1763 item in a <li>. 1763 item in a <li>.
1764 1764
diff --git a/lisp/composite.el b/lisp/composite.el
index 205f5ed3712..94b14dfc94a 100644
--- a/lisp/composite.el
+++ b/lisp/composite.el
@@ -838,6 +838,7 @@ omitted or nil.
838 838
839For more information on Auto Composition mode, see 839For more information on Auto Composition mode, see
840`auto-composition-mode' ." 840`auto-composition-mode' ."
841 :global t
841 :variable (default-value 'auto-composition-mode)) 842 :variable (default-value 'auto-composition-mode))
842 843
843(defalias 'toggle-auto-composition 'auto-composition-mode) 844(defalias 'toggle-auto-composition 'auto-composition-mode)
diff --git a/lisp/doc-view.el b/lisp/doc-view.el
index 06cf8dcef3a..af7f1996cc5 100644
--- a/lisp/doc-view.el
+++ b/lisp/doc-view.el
@@ -140,6 +140,7 @@
140(require 'dired) 140(require 'dired)
141(require 'image-mode) 141(require 'image-mode)
142(require 'jka-compr) 142(require 'jka-compr)
143(require 'subr-x)
143 144
144;;;; Customization Options 145;;;; Customization Options
145 146
@@ -695,14 +696,19 @@ It's a subdirectory of `doc-view-cache-directory'."
695 (setq doc-view--current-cache-dir 696 (setq doc-view--current-cache-dir
696 (file-name-as-directory 697 (file-name-as-directory
697 (expand-file-name 698 (expand-file-name
698 (concat (subst-char-in-string ?% ?_ ;; bug#13679 699 (concat (thread-last
699 (file-name-nondirectory doc-view--buffer-file-name)) 700 (file-name-nondirectory doc-view--buffer-file-name)
700 "-" 701 ;; bug#13679
701 (let ((file doc-view--buffer-file-name)) 702 (subst-char-in-string ?% ?_)
702 (with-temp-buffer 703 ;; arc-mode concatenates archive name and file name
703 (set-buffer-multibyte nil) 704 ;; with colon, which isn't allowed on MS-Windows.
704 (insert-file-contents-literally file) 705 (subst-char-in-string ?: ?_))
705 (md5 (current-buffer))))) 706 "-"
707 (let ((file doc-view--buffer-file-name))
708 (with-temp-buffer
709 (set-buffer-multibyte nil)
710 (insert-file-contents-literally file)
711 (md5 (current-buffer)))))
706 doc-view-cache-directory))))) 712 doc-view-cache-directory)))))
707 713
708;;;###autoload 714;;;###autoload
diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el
index f29f64f0562..6a4d835b63c 100644
--- a/lisp/emacs-lisp/easy-mmode.el
+++ b/lisp/emacs-lisp/easy-mmode.el
@@ -68,6 +68,7 @@ replacing its case-insensitive matches with the literal string in LIGHTER."
68 "toggle-\\|-mode\\'" "" 68 "toggle-\\|-mode\\'" ""
69 (symbol-name mode)))) 69 (symbol-name mode))))
70 " mode"))) 70 " mode")))
71 (setq name (replace-regexp-in-string "\\`Global-" "Global " name))
71 (if (not (stringp lighter)) name 72 (if (not (stringp lighter)) name
72 ;; Strip leading and trailing whitespace from LIGHTER. 73 ;; Strip leading and trailing whitespace from LIGHTER.
73 (setq lighter (replace-regexp-in-string "\\`\\s-+\\|\\s-+\\'" "" 74 (setq lighter (replace-regexp-in-string "\\`\\s-+\\|\\s-+\\'" ""
diff --git a/lisp/gnus/ChangeLog.3 b/lisp/gnus/ChangeLog.3
index 5e7e95b0466..e6cbe0458b4 100644
--- a/lisp/gnus/ChangeLog.3
+++ b/lisp/gnus/ChangeLog.3
@@ -1732,7 +1732,7 @@
1732 * eww.el (eww-convert-widgets): Put `help-echo' on input fields so that 1732 * eww.el (eww-convert-widgets): Put `help-echo' on input fields so that
1733 we can navigate to them. 1733 we can navigate to them.
1734 1734
1735 * shr.el (shr-colorize-region): Put the colours over the entire region. 1735 * shr.el (shr-colorize-region): Put the colors over the entire region.
1736 (shr-inhibit-decoration): New variable. 1736 (shr-inhibit-decoration): New variable.
1737 (shr-add-font): Use it to inhibit text property decorations while doing 1737 (shr-add-font): Use it to inhibit text property decorations while doing
1738 preliminary table renderings. This speeds up typical Wikipedia page 1738 preliminary table renderings. This speeds up typical Wikipedia page
@@ -1824,7 +1824,7 @@
1824 * shr.el (shr-expand-url): Respect // URLs. 1824 * shr.el (shr-expand-url): Respect // URLs.
1825 1825
1826 * eww.el (eww-tag-body): Override the shr body rendering so that we can 1826 * eww.el (eww-tag-body): Override the shr body rendering so that we can
1827 put a background colour onto the entire buffer. 1827 put a background color onto the entire buffer.
1828 (eww-render): When being redirected, use the redirect URL as the new 1828 (eww-render): When being redirected, use the redirect URL as the new
1829 base URL. 1829 base URL.
1830 1830
@@ -3514,7 +3514,7 @@
3514 3514
3515 * mm-archive.el (mm-archive-decoders): Add support for tar. 3515 * mm-archive.el (mm-archive-decoders): Add support for tar.
3516 3516
3517 * gnus.el (gnus-logo-color-alist): Change the colours for Ma Gnus. 3517 * gnus.el (gnus-logo-color-alist): Change the colors for Ma Gnus.
3518 3518
3519 * nnmail.el (nnmail-extra-headers): Add Cc to the default. 3519 * nnmail.el (nnmail-extra-headers): Add Cc to the default.
3520 3520
diff --git a/lisp/progmodes/cc-engine.el b/lisp/progmodes/cc-engine.el
index 39600cf28f8..8f2acf3cd61 100644
--- a/lisp/progmodes/cc-engine.el
+++ b/lisp/progmodes/cc-engine.el
@@ -6056,7 +6056,10 @@ comment at the start of cc-engine.el for more info."
6056 ;; Stop on ',', '|', '&', '+' and '-' to catch 6056 ;; Stop on ',', '|', '&', '+' and '-' to catch
6057 ;; common binary operators that could be between 6057 ;; common binary operators that could be between
6058 ;; two comparison expressions "a<b" and "c>d". 6058 ;; two comparison expressions "a<b" and "c>d".
6059 "[<;{},|+&-]\\|[>)]" 6059 ;; 2016-02-11: C++11 templates can now contain arithmetic
6060 ;; expressions, so template detection in C++ is now less
6061 ;; robust than it was.
6062 c-<>-notable-chars-re
6060 nil t t)) 6063 nil t t))
6061 6064
6062 (cond 6065 (cond
@@ -6064,7 +6067,9 @@ comment at the start of cc-engine.el for more info."
6064 ;; Either an operator starting with '>' or the end of 6067 ;; Either an operator starting with '>' or the end of
6065 ;; the angle bracket arglist. 6068 ;; the angle bracket arglist.
6066 6069
6067 (if (looking-at c->-op-without->-cont-regexp) 6070 (if (save-excursion
6071 (c-backward-token-2)
6072 (looking-at c-multichar->-op-not->>-regexp))
6068 (progn 6073 (progn
6069 (goto-char (match-end 0)) 6074 (goto-char (match-end 0))
6070 t) ; Continue the loop. 6075 t) ; Continue the loop.
@@ -6134,6 +6139,11 @@ comment at the start of cc-engine.el for more info."
6134 ))) 6139 )))
6135 t) ; carry on looping. 6140 t) ; carry on looping.
6136 6141
6142 ((and
6143 (eq (char-before) ?\()
6144 (c-go-up-list-forward)
6145 (eq (char-before) ?\))))
6146
6137 ((and (not c-restricted-<>-arglists) 6147 ((and (not c-restricted-<>-arglists)
6138 (or (and (eq (char-before) ?&) 6148 (or (and (eq (char-before) ?&)
6139 (not (eq (char-after) ?&))) 6149 (not (eq (char-after) ?&)))
diff --git a/lisp/progmodes/cc-langs.el b/lisp/progmodes/cc-langs.el
index ef894043bce..86b6bec78a1 100644
--- a/lisp/progmodes/cc-langs.el
+++ b/lisp/progmodes/cc-langs.el
@@ -228,6 +228,12 @@ the evaluated constant value at compile time."
228 ;; with the group symbol for each group and should return non-nil 228 ;; with the group symbol for each group and should return non-nil
229 ;; if that group is to be included. 229 ;; if that group is to be included.
230 ;; 230 ;;
231 ;; OP-FILTER selects the operators. It is either t to select all
232 ;; operators, a string to select all operators for which `string-match'
233 ;; matches the operator with the string, or a function which will be
234 ;; called with the operator and should return non-nil when the operator
235 ;; is to be selected.
236 ;;
231 ;; If XLATE is given, it's a function which is called for each 237 ;; If XLATE is given, it's a function which is called for each
232 ;; matching operator and its return value is collected instead. 238 ;; matching operator and its return value is collected instead.
233 ;; If it returns a list, the elements are spliced directly into 239 ;; If it returns a list, the elements are spliced directly into
@@ -1237,7 +1243,6 @@ operators."
1237 t 1243 t
1238 "\\`<." 1244 "\\`<."
1239 (lambda (op) (substring op 1))))) 1245 (lambda (op) (substring op 1)))))
1240
1241(c-lang-defvar c-<-op-cont-regexp (c-lang-const c-<-op-cont-regexp)) 1246(c-lang-defvar c-<-op-cont-regexp (c-lang-const c-<-op-cont-regexp))
1242 1247
1243(c-lang-defconst c->-op-cont-tokens 1248(c-lang-defconst c->-op-cont-tokens
@@ -1256,7 +1261,6 @@ operators."
1256 ;; Regexp matching the second and subsequent characters of all 1261 ;; Regexp matching the second and subsequent characters of all
1257 ;; multicharacter tokens that begin with ">". 1262 ;; multicharacter tokens that begin with ">".
1258 t (c-make-keywords-re nil (c-lang-const c->-op-cont-tokens))) 1263 t (c-make-keywords-re nil (c-lang-const c->-op-cont-tokens)))
1259
1260(c-lang-defvar c->-op-cont-regexp (c-lang-const c->-op-cont-regexp)) 1264(c-lang-defvar c->-op-cont-regexp (c-lang-const c->-op-cont-regexp))
1261 1265
1262(c-lang-defconst c->-op-without->-cont-regexp 1266(c-lang-defconst c->-op-without->-cont-regexp
@@ -1271,10 +1275,19 @@ operators."
1271 "\\`>>" 1275 "\\`>>"
1272 (lambda (op) (substring op 1))) 1276 (lambda (op) (substring op 1)))
1273 :test 'string-equal))) 1277 :test 'string-equal)))
1274
1275(c-lang-defvar c->-op-without->-cont-regexp 1278(c-lang-defvar c->-op-without->-cont-regexp
1276 (c-lang-const c->-op-without->-cont-regexp)) 1279 (c-lang-const c->-op-without->-cont-regexp))
1277 1280
1281(c-lang-defconst c-multichar->-op-not->>-regexp
1282 ;; Regexp matching multichar tokens containing ">", except ">>"
1283 t (c-make-keywords-re nil
1284 (delete ">>"
1285 (c-filter-ops (c-lang-const c-all-op-syntax-tokens)
1286 t
1287 "\\(.>\\|>.\\)"))))
1288(c-lang-defvar c-multichar->-op-not->>-regexp
1289 (c-lang-const c-multichar->-op-not->>-regexp))
1290
1278(c-lang-defconst c-stmt-delim-chars 1291(c-lang-defconst c-stmt-delim-chars
1279 ;; The characters that should be considered to bound statements. To 1292 ;; The characters that should be considered to bound statements. To
1280 ;; optimize `c-crosses-statement-barrier-p' somewhat, it's assumed to 1293 ;; optimize `c-crosses-statement-barrier-p' somewhat, it's assumed to
@@ -3079,6 +3092,20 @@ expression is considered to be a type."
3079 ; generics is not yet coded in CC Mode. 3092 ; generics is not yet coded in CC Mode.
3080(c-lang-defvar c-recognize-<>-arglists (c-lang-const c-recognize-<>-arglists)) 3093(c-lang-defvar c-recognize-<>-arglists (c-lang-const c-recognize-<>-arglists))
3081 3094
3095(c-lang-defconst c-<>-notable-chars-re
3096 "A regexp matching any single character notable inside a <...> construct.
3097This must include \"<\" and \">\", and should include \",\", and
3098any character which cannot be valid inside such a construct.
3099This is used in `c-forward-<>-arglist-recur' to try to detect
3100sequences of tokens which cannot be a template/generic construct.
3101When \"(\" is present, that defun will attempt to parse a
3102parenthesized expression inside the template. When \")\" is
3103present it will treat an unbalanced closing paren as a sign of
3104the invalidity of the putative template construct."
3105 t "[<;{},|+&->)]"
3106 c++ "[<;{},>()]")
3107(c-lang-defvar c-<>-notable-chars-re (c-lang-const c-<>-notable-chars-re))
3108
3082(c-lang-defconst c-enums-contain-decls 3109(c-lang-defconst c-enums-contain-decls
3083 "Non-nil means that an enum structure can contain declarations." 3110 "Non-nil means that an enum structure can contain declarations."
3084 t nil 3111 t nil
diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el
index 7e6f157f5fe..f04a7226d18 100644
--- a/lisp/progmodes/grep.el
+++ b/lisp/progmodes/grep.el
@@ -189,7 +189,7 @@ Customize or call the function `grep-apply-setting'."
189 :group 'grep) 189 :group 'grep)
190 190
191(defcustom grep-files-aliases 191(defcustom grep-files-aliases
192 '(("all" . "* .*") 192 '(("all" . "* .[!.]* ..?*") ;; Don't match `..'. See bug#22577
193 ("el" . "*.el") 193 ("el" . "*.el")
194 ("ch" . "*.[ch]") 194 ("ch" . "*.[ch]")
195 ("c" . "*.c") 195 ("c" . "*.c")