From cb211eb2f6ea692c2ade1b488cab097f82d7db14 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Fri, 18 Apr 2003 13:53:18 +0000 Subject: [PATCH] (view-read-only): Move from view.el to files.el. --- lisp/ChangeLog | 47 +++++++++++++++++++++++++++++++++++++++++++++++ lisp/files.el | 5 ++++- lisp/view.el | 5 ----- 3 files changed, 51 insertions(+), 6 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7406bc8e4a1..8068bc2669c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2003-04-18 Stefan Monnier + + * view.el (view-read-only): Move to files.el. + * files.el (view-read-only): Move from view.el. + 2003-04-17 Stefan Monnier * files.el (view-read-only): Don't declare a second time. @@ -360,6 +365,48 @@ * language/ind-util.el (indian-2-column-to-ucs-region): Fix for the case of replacing multibyte characters. +2003-04-09 Stefan Monnier + + * textmodes/bibtex.el: Update copyright and Author list. + Don't require `compile' since it seems unnecessary. + (bibtex-version): Remove. + (bibtex-sort-ignore-string-entries, bibtex-maintain-sorted-entries) + (bibtex-field-name-for-parsing): Don't make auto-buffer-local. + (bibtex-comment-start): Don't include the space. + (zmacs-regions, reporter-prompt-for-summary-p): + Declare to quieten the byte-compiler. + (bibtex-reference-key, bibtex-mode-syntax-table): Remove = + because it can't be part of a string's key. + (bibtex-parse-field-name): Use prog1. + (bibtex-font-lock-syntactic-keywords): New var. + (bibtex-font-lock-keywords): Remove the entry for @Comment. + (bibtex-search-entry): Simplify. + (bibtex-empty-re): New var. + (bibtex-format-entry): Slightly restructure some loops to avoid code + duplication. Use looking-at rather than `substring + string-match'. + Use bibtex-empty-re (which removes unnecessary \(..\) in regexps). + Remove now unused end-name. Use bibtex-find-crossref. + Don't downcase since case-fold-search is t. + (bibtex-autokey-get-yearfield): Use bibtex-find-crossref. + (bibtex-parse-keys): Use unless and push. + Parse even if bibtex-maintain-sorted-entries is nil. + (bibtex-complete): Use push. Don't sort completions. + (bibtex-mode): Use push. Update comment-start-skip. + Improve defun-prompt-regexp and outline-regexp. + Add bibtex-font-lock-syntactic-keywords to font-lock-defaults. + (bibtex-end-of-entry): Remove unused \(...\). + (bibtex-sort-key): New fun. + (bibtex-sort-buffer, bibtex-validate): Use it. + (bibtex-find-crossref): New fun. + (bibtex-validate): Use push & dolist; remove \(...\). + (bibtex-clean-entry): Use unless and friends. + Don't add the key to the list if the list hasn't been built yet. + (bibtex-fill-entry): Remove unused begin-name and end-name. + (bibtex-reformat): Kill local var instead of setting it to nil. + (bibtex-convert-alien): Use deactivate-mark rather than the + non-existent bibtex-mark-active variable. + (bibtex-String): Simplify. + 2003-04-09 Richard M. Stallman * files.el (file-chase-links): Fix previous change. diff --git a/lisp/files.el b/lisp/files.el index c6b91c57d6d..6e1a5b4c799 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -442,7 +442,10 @@ and ignores this variable." (or (fboundp 'file-locked-p) (defalias 'file-locked-p 'ignore)) -(defvar view-read-only) ;Declared in view.el. +(defcustom view-read-only nil + "*Non-nil means buffers visiting files read-only, do it in view mode." + :type 'boolean + :group 'view) (put 'ange-ftp-completion-hook-function 'safe-magic t) (defun ange-ftp-completion-hook-function (op &rest args) diff --git a/lisp/view.el b/lisp/view.el index 96907371aec..ce5c1df702b 100644 --- a/lisp/view.el +++ b/lisp/view.el @@ -53,11 +53,6 @@ :group 'wp :group 'editing) -(defcustom view-read-only nil - "*Non-nil means buffers visiting files read-only, do it in view mode." - :type 'boolean - :group 'view) - (defcustom view-highlight-face 'highlight "*The face used for highlighting the match found by View mode search." :type 'face -- 2.39.2