mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-27 07:37:33 +00:00
Remove some declare-function stub definitions
* lisp/emulation/viper-cmd.el, lisp/emulation/viper-keym.el: * lisp/emulation/viper-util.el, lisp/net/newst-plainview.el: * lisp/net/newst-treeview.el, lisp/ps-def.el, lisp/vc/ediff.el: * lisp/vc/ediff-util.el, lisp/vc/ediff-wind.el: Remove stub declare-function definitions. It exists since Emacs 22.2, released 10 years ago. Most of these files are using even newer features, such as lexical-binding and cl-lib anyway, making the stubs pointless.
This commit is contained in:
parent
c5a363080c
commit
582f46cbe2
@ -45,8 +45,6 @@
|
||||
(defvar undo-beg-posn)
|
||||
(defvar undo-end-posn)
|
||||
|
||||
(eval-and-compile
|
||||
(unless (fboundp 'declare-function) (defmacro declare-function (&rest _))))
|
||||
;; end pacifier
|
||||
|
||||
|
||||
|
@ -32,8 +32,6 @@
|
||||
(defvar viper-ex-style-editing)
|
||||
(defvar viper-ex-style-motion)
|
||||
|
||||
(eval-and-compile
|
||||
(unless (fboundp 'declare-function) (defmacro declare-function (&rest r))))
|
||||
;; end pacifier
|
||||
|
||||
(require 'viper-util)
|
||||
|
@ -42,9 +42,6 @@
|
||||
|
||||
(require 'ring)
|
||||
|
||||
(eval-and-compile
|
||||
(unless (fboundp 'declare-function) (defmacro declare-function (&rest r))))
|
||||
|
||||
;; end pacifier
|
||||
|
||||
(require 'viper-init)
|
||||
|
@ -562,7 +562,6 @@ This does NOT start the retrieval timers."
|
||||
(newsticker--debug-msg "Getting news for %s" (symbol-name feed))
|
||||
(newsticker-get-news (symbol-name feed)))))
|
||||
|
||||
(unless (fboundp 'declare-function) (defmacro declare-function (&rest r)))
|
||||
(declare-function w3m-toggle-inline-image "ext:w3m" (&optional force no-cache))
|
||||
|
||||
(defun newsticker-w3m-show-inline-images ()
|
||||
|
@ -259,7 +259,6 @@ their id stays constant."
|
||||
|
||||
;; ======================================================================
|
||||
|
||||
(unless (fboundp 'declare-function) (defmacro declare-function (&rest _)))
|
||||
(declare-function w3m-toggle-inline-images "ext:w3m" (&optional force no-cache))
|
||||
(defvar w3m-fill-column)
|
||||
(defvar w3-maximum-line-length)
|
||||
|
@ -31,9 +31,6 @@
|
||||
|
||||
;;; Code:
|
||||
|
||||
(eval-and-compile
|
||||
(unless (fboundp 'declare-function) (defmacro declare-function (&rest _r))))
|
||||
|
||||
(declare-function ps-plot-with-face "ps-print" (from to face))
|
||||
(declare-function ps-plot-string "ps-print" (string))
|
||||
|
||||
|
@ -39,9 +39,6 @@
|
||||
|
||||
(defvar ediff-after-quit-hook-internal nil)
|
||||
|
||||
(eval-and-compile
|
||||
(unless (fboundp 'declare-function) (defmacro declare-function (&rest _r))))
|
||||
|
||||
;; end pacifier
|
||||
|
||||
|
||||
|
@ -38,10 +38,6 @@
|
||||
(defvar frame-icon-title-format)
|
||||
(defvar ediff-diff-status)
|
||||
|
||||
;; declare-function does not exist in XEmacs
|
||||
(eval-and-compile
|
||||
(unless (fboundp 'declare-function) (defmacro declare-function (&rest _r))))
|
||||
|
||||
(require 'ediff-init)
|
||||
(require 'ediff-help)
|
||||
;; end pacifier
|
||||
|
@ -112,10 +112,6 @@
|
||||
|
||||
(provide 'ediff)
|
||||
|
||||
;; Compiler pacifier
|
||||
(eval-and-compile
|
||||
(unless (fboundp 'declare-function) (defmacro declare-function (&rest _r))))
|
||||
|
||||
(require 'ediff-util)
|
||||
;; end pacifier
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user