aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/progmodes
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/progmodes')
-rw-r--r--lisp/progmodes/cc-menus.el2
-rw-r--r--lisp/progmodes/compile.el4
-rw-r--r--lisp/progmodes/octave.el2
-rw-r--r--lisp/progmodes/sql.el2
4 files changed, 5 insertions, 5 deletions
diff --git a/lisp/progmodes/cc-menus.el b/lisp/progmodes/cc-menus.el
index 6746651f18b..9339dcd83cc 100644
--- a/lisp/progmodes/cc-menus.el
+++ b/lisp/progmodes/cc-menus.el
@@ -117,7 +117,7 @@ A sample value might look like: `\\(_P\\|_PROTO\\)'.")
117 ,(concat 117 ,(concat
118 "^\\<" ; line MUST start with word char 118 "^\\<" ; line MUST start with word char
119 ;; \n added to prevent overflow in regexp matcher. 119 ;; \n added to prevent overflow in regexp matcher.
120 ;; http://lists.gnu.org/archive/html/emacs-pretest-bug/2007-02/msg00021.html 120 ;; https://lists.gnu.org/archive/html/emacs-pretest-bug/2007-02/msg00021.html
121 "[^()\n]*" ; no parentheses before 121 "[^()\n]*" ; no parentheses before
122 "[^" c-alnum "_:<>~]" ; match any non-identifier char 122 "[^" c-alnum "_:<>~]" ; match any non-identifier char
123 "\\([" c-alpha "_][" c-alnum "_:<>~]*\\)" ; match function name 123 "\\([" c-alpha "_][" c-alnum "_:<>~]*\\)" ; match function name
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index b3d090382d7..e4b77ab0504 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -1740,7 +1740,7 @@ Returns the compilation buffer created."
1740 (setq thisdir default-directory)) 1740 (setq thisdir default-directory))
1741 (set-buffer-modified-p nil)) 1741 (set-buffer-modified-p nil))
1742 ;; Pop up the compilation buffer. 1742 ;; Pop up the compilation buffer.
1743 ;; http://lists.gnu.org/archive/html/emacs-devel/2007-11/msg01638.html 1743 ;; https://lists.gnu.org/archive/html/emacs-devel/2007-11/msg01638.html
1744 (setq outwin (display-buffer outbuf '(nil (allow-no-window . t)))) 1744 (setq outwin (display-buffer outbuf '(nil (allow-no-window . t))))
1745 (with-current-buffer outbuf 1745 (with-current-buffer outbuf
1746 (let ((process-environment 1746 (let ((process-environment
@@ -2855,7 +2855,7 @@ TRUE-DIRNAME is the `file-truename' of DIRNAME, if given."
2855 ;; The gethash used to not use spec-directory, but 2855 ;; The gethash used to not use spec-directory, but
2856 ;; this leads to errors when files in different 2856 ;; this leads to errors when files in different
2857 ;; directories have the same name: 2857 ;; directories have the same name:
2858 ;; http://lists.gnu.org/archive/html/emacs-devel/2007-08/msg00463.html 2858 ;; https://lists.gnu.org/archive/html/emacs-devel/2007-08/msg00463.html
2859 (or (gethash (cons filename spec-directory) compilation-locs) 2859 (or (gethash (cons filename spec-directory) compilation-locs)
2860 (puthash (cons filename spec-directory) 2860 (puthash (cons filename spec-directory)
2861 (compilation--make-file-struct 2861 (compilation--make-file-struct
diff --git a/lisp/progmodes/octave.el b/lisp/progmodes/octave.el
index 7e91201784e..103b6ce7c51 100644
--- a/lisp/progmodes/octave.el
+++ b/lisp/progmodes/octave.el
@@ -1497,7 +1497,7 @@ current buffer file unless called with a prefix arg \\[universal-argument]."
1497 (string (buffer-substring-no-properties beg end)) 1497 (string (buffer-substring-no-properties beg end))
1498 line) 1498 line)
1499 (with-current-buffer inferior-octave-buffer 1499 (with-current-buffer inferior-octave-buffer
1500 ;; http://lists.gnu.org/archive/html/emacs-devel/2013-10/msg00095.html 1500 ;; https://lists.gnu.org/archive/html/emacs-devel/2013-10/msg00095.html
1501 (compilation-forget-errors) 1501 (compilation-forget-errors)
1502 (setq inferior-octave-output-list nil) 1502 (setq inferior-octave-output-list nil)
1503 (while (not (string-equal string "")) 1503 (while (not (string-equal string ""))
diff --git a/lisp/progmodes/sql.el b/lisp/progmodes/sql.el
index b8ce326f172..db88563a3e7 100644
--- a/lisp/progmodes/sql.el
+++ b/lisp/progmodes/sql.el
@@ -28,7 +28,7 @@
28;; Please send bug reports and bug fixes to the mailing list at 28;; Please send bug reports and bug fixes to the mailing list at
29;; help-gnu-emacs@gnu.org. If you want to subscribe to the mailing 29;; help-gnu-emacs@gnu.org. If you want to subscribe to the mailing
30;; list, see the web page at 30;; list, see the web page at
31;; http://lists.gnu.org/mailman/listinfo/help-gnu-emacs for 31;; https://lists.gnu.org/mailman/listinfo/help-gnu-emacs for
32;; instructions. I monitor this list actively. If you send an e-mail 32;; instructions. I monitor this list actively. If you send an e-mail
33;; to Alex Schroeder it usually makes it to me when Alex has a chance 33;; to Alex Schroeder it usually makes it to me when Alex has a chance
34;; to forward them along (Thanks, Alex). 34;; to forward them along (Thanks, Alex).