; Delete not-useful comments referring to Emacs 19.

This commit is contained in:
Stefan Kangas 2022-08-19 17:59:13 +02:00
parent 043ae1f53a
commit b7d6ebff07
7 changed files with 7 additions and 13 deletions

View file

@ -150,7 +150,6 @@
;; This function uses calc-last-kill if possible to get an exact result,
;; otherwise it just parses the yanked string.
;; Modified to use Emacs 19 extended concept of kill-ring. -- daveg 12/15/96
;;;###autoload
(defun calc-yank-internal (radix thing-raw)
"Internal common implementation for yank functions.

View file

@ -2232,7 +2232,6 @@ nil."
(progn
(ispell-set-spellchecker-params) ; Initialize variables and dict alists.
(ispell-accept-buffer-local-defs) ; Use the correct dictionary.
;; This code copied in part from ispell.el Emacs 19.34
(dolist (w checkdoc-ispell-lisp-words)
(process-send-string ispell-process (concat "@" w "\n"))))
(error (setq checkdoc-spellcheck-documentation-flag nil)))))

View file

@ -2861,7 +2861,6 @@ See `edebug-behavior-alist' for implementations.")
(this-command this-command)
(current-prefix-arg nil)
;; More for Emacs 19
(last-input-event nil)
(last-command-event nil)
(last-event-frame nil)

View file

@ -111,7 +111,7 @@
;; provide the functionality or interface that I wanted, so I wrote
;; this.
;; Unlike previous profilers, elp uses Emacs 19's built-in function
;; Unlike previous profilers, elp uses the built-in function
;; current-time to return interval times. This obviates the need for
;; both an external C program and Emacs processes to communicate with
;; such a program, and thus simplifies the package as a whole.

View file

@ -867,8 +867,8 @@ Should be set in `viper-custom-file-name'."
(defvar-local viper-minibuffer-overlay nil)
(put 'viper-minibuffer-overlay 'permanent-local t)
;; Hook, specific to Viper, which is run just *before* exiting the minibuffer.
;; This is needed because beginning with Emacs 19.26, the standard
;; Hook, specific to Viper, which is run just *before* exiting the
;; minibuffer. This is needed because, the standard
;; `minibuffer-exit-hook' is run *after* exiting the minibuffer
(defvar viper-minibuffer-exit-hook nil)

View file

@ -163,8 +163,6 @@ with no args, if that value is non-nil."
'((icon-font-lock-keywords
icon-font-lock-keywords-1 icon-font-lock-keywords-2)
nil nil ((?_ . "w")) beginning-of-defun
;; Obsoleted by Emacs 19.35 parse-partial-sexp's COMMENTSTOP.
;;(font-lock-comment-start-regexp . "#")
(font-lock-mark-block-function . mark-defun)))
;; imenu support
(setq-local imenu-generic-expression icon-imenu-generic-expression)

View file

@ -232,11 +232,10 @@
;; =======================
;;
;; If Emacs has set the variable window-system to nil, vcursor will
;; assume that overlays cannot be displayed in a different face,
;; and will instead use a string (the variable vcursor-string, by
;; default "**>") to show its position. This was first implemented
;; in Emacs 19.29. Unlike the old-fashioned overlay arrow (as used
;; by debuggers), this appears between existing text, which can
;; assume that overlays cannot be displayed in a different face, and
;; will instead use a string (the variable vcursor-string, by default "**>")
;; to show its position. Unlike the old-fashioned overlay arrow (as
;; used by debuggers), this appears between existing text, which can
;; make it hard to read if you're not used to it. (This seemed the
;; better option here.) This means moving the vcursor up and down is
;; a very efficient way of locating it!