From: Stefan Kangas Date: Sun, 7 Mar 2021 05:26:53 +0000 (+0100) Subject: Remove additional items obsolete since Emacs 22/23 X-Git-Tag: emacs-28.0.90~3389 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=856a0a913a1932e1bad8e44d34944ce7504b23ff;p=emacs.git Remove additional items obsolete since Emacs 22/23 * lisp/speedbar.el (speedbar-update-speed) (speedbar-navigating-speed): Remove variables obsolete since Emacs 23. (speedbar-dir-follow, speedbar-directory-buttons-follow): Don't use above removed variables. * lisp/erc/erc.el (erc-announced-server-name, erc-process) (erc-default-coding-system, erc-send-command): Remove variables and functions obsolete since Emacs 22. ; * etc/NEWS: List removed items. --- diff --git a/etc/NEWS b/etc/NEWS index d36771377e8..c4feabb5113 100644 --- a/etc/NEWS +++ b/etc/NEWS @@ -2335,15 +2335,16 @@ ledit.el, lmenu.el, lucid.el and old-whitespace.el. 'dirtrack-debug-toggle', 'dynamic-completion-table', 'easy-menu-precalculate-equivalent-keybindings', 'epa-display-verify-result', 'epg-passphrase-callback-function', -'eshell-report-bug', 'eval-next-after-load', 'exchange-dot-and-mark', -'ffap-bug', 'ffap-submit-bug', 'ffap-version', -'file-cache-choose-completion', 'forward-point', 'generic-char-p', -'global-highlight-changes', 'hi-lock-face-history', -'hi-lock-regexp-history', 'highlight-changes-active-string', -'highlight-changes-initial-state', 'highlight-changes-passive-string', -'image-mode-maybe', 'imenu-example--name-and-position', -'ispell-aspell-supports-utf8', 'lisp-mode-auto-fill', -'locate-file-completion', 'make-coding-system', +'erc-announced-server-name', 'erc-process', +'erc-default-coding-system', 'erc-send-command', 'eshell-report-bug', +'eval-next-after-load', 'exchange-dot-and-mark', 'ffap-bug', +'ffap-submit-bug', 'ffap-version', 'file-cache-choose-completion', +'forward-point', 'generic-char-p', 'global-highlight-changes', +'hi-lock-face-history', 'hi-lock-regexp-history', +'highlight-changes-active-string', 'highlight-changes-initial-state', +'highlight-changes-passive-string', 'image-mode-maybe', +'imenu-example--name-and-position', 'ispell-aspell-supports-utf8', +'lisp-mode-auto-fill', 'locate-file-completion', 'make-coding-system', 'minibuffer-local-must-match-filename-map', 'mouse-choose-completion', 'mouse-major-mode-menu', 'mouse-popup-menubar', 'mouse-popup-menubar-stuff', 'newsticker-groups-filename', @@ -2379,7 +2380,8 @@ ledit.el, lmenu.el, lucid.el and old-whitespace.el. 'semantic-token-type-parent', 'semantic-toplevel-bovine-cache', 'semantic-toplevel-bovine-table', 'semanticdb-mode-hooks', 'set-coding-priority', 'set-process-filter-multibyte', -'shadows-compare-text-p', 'shell-dirtrack-toggle', 't-mouse-mode', +'shadows-compare-text-p', 'shell-dirtrack-toggle', +'speedbar-update-speed', 'speedbar-navigating-speed', 't-mouse-mode', 'term-dynamic-simple-complete', 'tooltip-hook', 'tpu-have-ispell', 'url-generate-unique-filename', 'url-temporary-directory', 'vc-arch-command', 'vc-default-working-revision' (variable), diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el index 1e44e4e3e37..4d45ac29bab 100644 --- a/lisp/erc/erc.el +++ b/lisp/erc/erc.el @@ -114,17 +114,6 @@ "Running scripts at startup and with /LOAD" :group 'erc) -;; compatibility with older ERC releases - -(define-obsolete-variable-alias 'erc-announced-server-name - 'erc-server-announced-name "ERC 5.1") -(define-obsolete-variable-alias 'erc-process 'erc-server-process "ERC 5.1") -(define-obsolete-variable-alias 'erc-default-coding-system - 'erc-server-coding-system "ERC 5.1") - -(define-obsolete-function-alias 'erc-send-command - 'erc-server-send "ERC 5.1") - (require 'erc-backend) ;; tunable connection and authentication parameters diff --git a/lisp/speedbar.el b/lisp/speedbar.el index 4a785623805..6c4c8eb8132 100644 --- a/lisp/speedbar.el +++ b/lisp/speedbar.el @@ -289,22 +289,6 @@ A nil value means don't show the file in the list." :group 'speedbar :type 'boolean) -;;; EVENTUALLY REMOVE THESE - -;; When I moved to a repeating timer, I had the horrible misfortune -;; of losing the ability for adaptive speed choice. This update -;; speed currently causes long delays when it should have been turned off. -(defvar speedbar-update-speed dframe-update-speed) -(make-obsolete-variable 'speedbar-update-speed - 'dframe-update-speed - "speedbar 1.0pre3 (Emacs 23.1)") - -(defvar speedbar-navigating-speed dframe-update-speed) -(make-obsolete-variable 'speedbar-navigating-speed - 'dframe-update-speed - "speedbar 1.0pre3 (Emacs 23.1)") -;;; END REMOVE THESE - (defcustom speedbar-frame-parameters '((minibuffer . nil) (width . 20) (border-width . 0) @@ -3260,7 +3244,7 @@ subdirectory chosen will be at INDENT level." ;; in case. (let ((speedbar-smart-directory-expand-flag nil)) (speedbar-update-contents)) - (speedbar-set-timer speedbar-navigating-speed) + (speedbar-set-timer dframe-update-speed) (setq speedbar-last-selected-file nil) (speedbar-stealthy-updates)) @@ -3323,7 +3307,7 @@ INDENT is the current indentation level and is unused." ;; update contents will change directory without ;; having to touch the attached frame. (speedbar-update-contents) - (speedbar-set-timer speedbar-navigating-speed)) + (speedbar-set-timer dframe-update-speed)) (defun speedbar-tag-file (text token indent) "The cursor is on a selected line. Expand the tags in the specified file.