From 6d74f7822d9b78f2e3bb2b9f447700ae8508e31e Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Mon, 29 Aug 2005 10:41:37 +0000 Subject: (compilation-error-regexp-alist, compilation-mode-font-lock-keywords): Add defvars. (checkdoc-interactive-loop): "?\ " -> "?\s". --- lisp/emacs-lisp/checkdoc.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'lisp/emacs-lisp') diff --git a/lisp/emacs-lisp/checkdoc.el b/lisp/emacs-lisp/checkdoc.el index 6b6d3ba4393..913ffcf1941 100644 --- a/lisp/emacs-lisp/checkdoc.el +++ b/lisp/emacs-lisp/checkdoc.el @@ -190,6 +190,9 @@ (defmacro defcustom (var value doc &rest args) `(defvar ,var ,value ,doc)))) +(defvar compilation-error-regexp-alist) +(defvar compilation-mode-font-lock-keywords) + (defcustom checkdoc-autofix-flag 'semiautomatic "*Non-nil means attempt auto-fixing of doc strings. If this value is the symbol `query', then the user is queried before @@ -653,7 +656,7 @@ style." "No Additional style errors. Continuing...") (sit-for 2)))))) ;; Move to the next error (if available) - ((or (checkdoc-char= c ?n) (checkdoc-char= c ?\ )) + ((or (checkdoc-char= c ?n) (checkdoc-char= c ?\s)) (let ((ne (funcall findfunc nil))) (if (not ne) (if showstatus -- cgit v1.2.3 From a1f008c22f79ade656d98eaa73e55628ac35d6d6 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Mon, 29 Aug 2005 10:44:18 +0000 Subject: (mouse-highlight-priority, x-lost-selection-functions, zmacs-regions): Add defvars. --- lisp/emacs-lisp/lselect.el | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'lisp/emacs-lisp') diff --git a/lisp/emacs-lisp/lselect.el b/lisp/emacs-lisp/lselect.el index 38ae8b74460..d0b333edfe4 100644 --- a/lisp/emacs-lisp/lselect.el +++ b/lisp/emacs-lisp/lselect.el @@ -34,6 +34,11 @@ ;; all upper-case; this may seem tasteless, but it makes there be a 1:1 ;; correspondence between these symbols and X Atoms (which are upcased.) +;; This is Lucid/XEmacs stuff +(defvar mouse-highlight-priority) +(defvar x-lost-selection-functions) +(defvar zmacs-regions) + (defalias 'x-get-cutbuffer 'x-get-cut-buffer) (defalias 'x-store-cutbuffer 'x-set-cut-buffer) -- cgit v1.2.3 From f96b52a36b375849c63f681bf98bad824ecc7cd4 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Mon, 29 Aug 2005 10:44:49 +0000 Subject: (font-lock-verbose): Add defvar. --- lisp/emacs-lisp/pp.el | 2 ++ 1 file changed, 2 insertions(+) (limited to 'lisp/emacs-lisp') diff --git a/lisp/emacs-lisp/pp.el b/lisp/emacs-lisp/pp.el index 542948c777c..1635aa4bfeb 100644 --- a/lisp/emacs-lisp/pp.el +++ b/lisp/emacs-lisp/pp.el @@ -27,6 +27,8 @@ ;;; Code: +(defvar font-lock-verbose) + (defgroup pp nil "Pretty printer for Emacs Lisp." :prefix "pp-" -- cgit v1.2.3 From 746dca0081c754fbcc8c9f3422191c2aae9295e9 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Mon, 29 Aug 2005 10:45:18 +0000 Subject: (font-lock-beginning-of-syntax-function): Add defvar. --- lisp/emacs-lisp/syntax.el | 2 ++ 1 file changed, 2 insertions(+) (limited to 'lisp/emacs-lisp') diff --git a/lisp/emacs-lisp/syntax.el b/lisp/emacs-lisp/syntax.el index a3683e82d2b..126c8d50dd9 100644 --- a/lisp/emacs-lisp/syntax.el +++ b/lisp/emacs-lisp/syntax.el @@ -47,6 +47,8 @@ (eval-when-compile (require 'cl)) +(defvar font-lock-beginning-of-syntax-function) + (defsubst syntax-ppss-depth (ppss) (nth 0 ppss)) -- cgit v1.2.3 From 436b938fb419f7f601d5bad2b87316a52277e81a Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Mon, 29 Aug 2005 10:46:03 +0000 Subject: (ses-initial-global-parameters, ses-mode-map): Add defvars. --- lisp/emacs-lisp/tcover-ses.el | 3 +++ 1 file changed, 3 insertions(+) (limited to 'lisp/emacs-lisp') diff --git a/lisp/emacs-lisp/tcover-ses.el b/lisp/emacs-lisp/tcover-ses.el index 1374aa1fdc0..e79c42180f4 100644 --- a/lisp/emacs-lisp/tcover-ses.el +++ b/lisp/emacs-lisp/tcover-ses.el @@ -23,6 +23,9 @@ (require 'testcover) +(defvar ses-initial-global-parameters) +(defvar ses-mode-map) + ;;;Here are some macros that exercise SES. Set `pause' to t if you want the ;;;macros to pause after each step. (let* ((pause nil) -- cgit v1.2.3 From dfc9a078920aaa69c75b712a9199f38db6c13de4 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Mon, 29 Aug 2005 10:46:28 +0000 Subject: (safe-functions): Add defvar. --- lisp/emacs-lisp/tcover-unsafep.el | 2 ++ 1 file changed, 2 insertions(+) (limited to 'lisp/emacs-lisp') diff --git a/lisp/emacs-lisp/tcover-unsafep.el b/lisp/emacs-lisp/tcover-unsafep.el index 354cfe6ab16..7f7a8fa57de 100644 --- a/lisp/emacs-lisp/tcover-unsafep.el +++ b/lisp/emacs-lisp/tcover-unsafep.el @@ -25,6 +25,8 @@ (require 'testcover) +(defvar safe-functions) + ;;;These forms are all considered safe (defconst testcover-unsafep-safe '(((lambda (x) (* x 2)) 14) -- cgit v1.2.3 From e0f589807f7264a949d8f466ec1e19abd06bccbd Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Mon, 29 Aug 2005 13:40:39 +0000 Subject: (font-lock-comment-face, font-lock-doc-face, font-lock-string-face, font-lock-keywords-case-fold-search): Add defvars. (emacs-lisp-mode-syntax-table): "?\ " -> "?\s". --- lisp/ChangeLog | 41 ++++++++++++++++++++++++++++++++++++++++- lisp/emacs-lisp/lisp-mode.el | 7 ++++++- 2 files changed, 46 insertions(+), 2 deletions(-) (limited to 'lisp/emacs-lisp') diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ead4aa28921..090cf988293 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,4 +1,43 @@ -2005-08-28 John Paul Wallington +2005-08-29 Juanma Barranquero + + * man.el (Man-init-defvars, Man-translate-references) + (Man-support-local-filenames, Man-highlight-references): + * progmodes/sql.el (sql-interactive-mode): + * shell.el (shell-mode, shell-resync-dirs): Fix typos in + docstrings. + + * emacs-lisp/checkdoc.el (compilation-error-regexp-alist) + (compilation-mode-font-lock-keywords): Add defvars. + (checkdoc-interactive-loop): "?\ " -> "?\s". + + * emacs-lisp/lisp-mode.el (font-lock-comment-face) + (font-lock-doc-face, font-lock-string-face) + (font-lock-keywords-case-fold-search): Add defvars. + (emacs-lisp-mode-syntax-table): "?\ " -> "?\s". + + * obsolete/sun-fns.el (mouse-select-or-drag-move-point): + Don't pass X and Y (they are ignored anyway). + (mouse-set-mark, mouse-select-window, mouse-delete-other-windows) + (mouse-delete-window): Make arguments optional. + + * obsolete/rnews.el (news-add-news-group): Don't use + `end-of-line'. + (caesar-translate-table, minor-modes, news-buffer-save) + (news-group-name, news-minor-modes): Add defvars. + + * emacs-lisp/lselect.el (mouse-highlight-priority) + (x-lost-selection-functions, zmacs-regions): + * emacs-lisp/pp.el (font-lock-verbose): + * emacs-lisp/syntax.el (font-lock-beginning-of-syntax-function): + * emacs-lisp/tcover-ses.el (ses-initial-global-parameters) + (ses-mode-map): + * emacs-lisp/tcover-unsafep.el (safe-functions): + * obsolete/fast-lock.el (font-lock-face-list): + * obsolete/rnewspost.el (mail-reply-buffer): + * obsolete/scribe.el (compile-command): + * obsolete/x-menu.el (x-process-mouse-hook): Add defvars. + +005-08-28 John Paul Wallington * ibuf-ext.el (ibuffer-auto-update-changed): Use `frame-or-buffer-changed-p' to check whether we need to update. diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index 6d281e5deb2..e50d5bd125c 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -30,6 +30,11 @@ ;;; Code: +(defvar font-lock-comment-face) +(defvar font-lock-doc-face) +(defvar font-lock-keywords-case-fold-search) +(defvar font-lock-string-face) + (defvar lisp-mode-abbrev-table nil) (defvar emacs-lisp-mode-syntax-table @@ -50,7 +55,7 @@ (while (< i 128) (modify-syntax-entry i "_ " table) (setq i (1+ i))) - (modify-syntax-entry ? " " table) + (modify-syntax-entry ?\s " " table) (modify-syntax-entry ?\t " " table) (modify-syntax-entry ?\f " " table) (modify-syntax-entry ?\n "> " table) -- cgit v1.2.3