diff options
| author | Juanma Barranquero | 2005-08-29 13:40:39 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2005-08-29 13:40:39 +0000 |
| commit | e0f589807f7264a949d8f466ec1e19abd06bccbd (patch) | |
| tree | a44e297722c90aab8c5d08123b968df853e256ea | |
| parent | ab646e4982dc849881724105875c2fb5636c01b5 (diff) | |
| download | emacs-e0f589807f7264a949d8f466ec1e19abd06bccbd.tar.gz emacs-e0f589807f7264a949d8f466ec1e19abd06bccbd.zip | |
(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".
| -rw-r--r-- | lisp/ChangeLog | 41 | ||||
| -rw-r--r-- | lisp/emacs-lisp/lisp-mode.el | 7 |
2 files changed, 46 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ead4aa28921..090cf988293 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,4 +1,43 @@ | |||
| 1 | 2005-08-28 John Paul Wallington <jpw@gnu.org> | 1 | 2005-08-29 Juanma Barranquero <lekktu@gmail.com> |
| 2 | |||
| 3 | * man.el (Man-init-defvars, Man-translate-references) | ||
| 4 | (Man-support-local-filenames, Man-highlight-references): | ||
| 5 | * progmodes/sql.el (sql-interactive-mode): | ||
| 6 | * shell.el (shell-mode, shell-resync-dirs): Fix typos in | ||
| 7 | docstrings. | ||
| 8 | |||
| 9 | * emacs-lisp/checkdoc.el (compilation-error-regexp-alist) | ||
| 10 | (compilation-mode-font-lock-keywords): Add defvars. | ||
| 11 | (checkdoc-interactive-loop): "?\ " -> "?\s". | ||
| 12 | |||
| 13 | * emacs-lisp/lisp-mode.el (font-lock-comment-face) | ||
| 14 | (font-lock-doc-face, font-lock-string-face) | ||
| 15 | (font-lock-keywords-case-fold-search): Add defvars. | ||
| 16 | (emacs-lisp-mode-syntax-table): "?\ " -> "?\s". | ||
| 17 | |||
| 18 | * obsolete/sun-fns.el (mouse-select-or-drag-move-point): | ||
| 19 | Don't pass X and Y (they are ignored anyway). | ||
| 20 | (mouse-set-mark, mouse-select-window, mouse-delete-other-windows) | ||
| 21 | (mouse-delete-window): Make arguments optional. | ||
| 22 | |||
| 23 | * obsolete/rnews.el (news-add-news-group): Don't use | ||
| 24 | `end-of-line'. | ||
| 25 | (caesar-translate-table, minor-modes, news-buffer-save) | ||
| 26 | (news-group-name, news-minor-modes): Add defvars. | ||
| 27 | |||
| 28 | * emacs-lisp/lselect.el (mouse-highlight-priority) | ||
| 29 | (x-lost-selection-functions, zmacs-regions): | ||
| 30 | * emacs-lisp/pp.el (font-lock-verbose): | ||
| 31 | * emacs-lisp/syntax.el (font-lock-beginning-of-syntax-function): | ||
| 32 | * emacs-lisp/tcover-ses.el (ses-initial-global-parameters) | ||
| 33 | (ses-mode-map): | ||
| 34 | * emacs-lisp/tcover-unsafep.el (safe-functions): | ||
| 35 | * obsolete/fast-lock.el (font-lock-face-list): | ||
| 36 | * obsolete/rnewspost.el (mail-reply-buffer): | ||
| 37 | * obsolete/scribe.el (compile-command): | ||
| 38 | * obsolete/x-menu.el (x-process-mouse-hook): Add defvars. | ||
| 39 | |||
| 40 | 005-08-28 John Paul Wallington <jpw@gnu.org> | ||
| 2 | 41 | ||
| 3 | * ibuf-ext.el (ibuffer-auto-update-changed): Use | 42 | * ibuf-ext.el (ibuffer-auto-update-changed): Use |
| 4 | `frame-or-buffer-changed-p' to check whether we need to update. | 43 | `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 @@ | |||
| 30 | 30 | ||
| 31 | ;;; Code: | 31 | ;;; Code: |
| 32 | 32 | ||
| 33 | (defvar font-lock-comment-face) | ||
| 34 | (defvar font-lock-doc-face) | ||
| 35 | (defvar font-lock-keywords-case-fold-search) | ||
| 36 | (defvar font-lock-string-face) | ||
| 37 | |||
| 33 | (defvar lisp-mode-abbrev-table nil) | 38 | (defvar lisp-mode-abbrev-table nil) |
| 34 | 39 | ||
| 35 | (defvar emacs-lisp-mode-syntax-table | 40 | (defvar emacs-lisp-mode-syntax-table |
| @@ -50,7 +55,7 @@ | |||
| 50 | (while (< i 128) | 55 | (while (< i 128) |
| 51 | (modify-syntax-entry i "_ " table) | 56 | (modify-syntax-entry i "_ " table) |
| 52 | (setq i (1+ i))) | 57 | (setq i (1+ i))) |
| 53 | (modify-syntax-entry ? " " table) | 58 | (modify-syntax-entry ?\s " " table) |
| 54 | (modify-syntax-entry ?\t " " table) | 59 | (modify-syntax-entry ?\t " " table) |
| 55 | (modify-syntax-entry ?\f " " table) | 60 | (modify-syntax-entry ?\f " " table) |
| 56 | (modify-syntax-entry ?\n "> " table) | 61 | (modify-syntax-entry ?\n "> " table) |