From: Stefan Kangas <stefan@marxist.se>
Date: Mon, 8 Aug 2022 09:13:58 +0000 (+0200)
Subject: Don't autoload obsolete library tpu-extras.el
X-Git-Tag: emacs-29.0.90~1447^2~326
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=77bf50cb330807039cc84138fb84870bd6d532e2;p=emacs.git

Don't autoload obsolete library tpu-extras.el

* lisp/obsolete/tpu-edt.el: Remove autoloads of obsolete library
tpu-extras.el.
* lisp/obsolete/tpu-extras.el: Don't set generated-autoload-file
to tpu-edt.el.
---

diff --git a/lisp/obsolete/tpu-edt.el b/lisp/obsolete/tpu-edt.el
index 8c4ec8f7e09..1e3fc0d569e 100644
--- a/lisp/obsolete/tpu-edt.el
+++ b/lisp/obsolete/tpu-edt.el
@@ -2412,35 +2412,6 @@ If FILE is nil, try to load a default file.  The default file name is
     (error nil))
   (setq tpu-edt-mode nil))
 
-
-;;;### (autoloads nil "tpu-extras" "tpu-extras.el" "cbbb448cff48fab904ac19805aa6f36a")
-;;; Generated autoloads from tpu-extras.el
-
-(autoload 'tpu-cursor-free-mode "tpu-extras" "\
-Minor mode to allow the cursor to move freely about the screen.
-With a prefix argument ARG, enable the mode if ARG is positive,
-and disable it otherwise.  If called from Lisp, enable the mode
-if ARG is omitted or nil.
-
-\(fn &optional ARG)" t nil)
-
-(autoload 'tpu-set-scroll-margins "tpu-extras" "\
-Set scroll margins.
-
-\(fn TOP BOTTOM)" t nil)
-
-(autoload 'tpu-set-cursor-free "tpu-extras" "\
-Allow the cursor to move freely about the screen.
-
-\(fn)" t nil)
-
-(autoload 'tpu-set-cursor-bound "tpu-extras" "\
-Constrain the cursor to the flow of the text.
-
-\(fn)" t nil)
-
-;;;***
-
 (provide 'tpu-edt)
 
 ;;; tpu-edt.el ends here
diff --git a/lisp/obsolete/tpu-extras.el b/lisp/obsolete/tpu-extras.el
index 76338cdd24e..23f6020fd3a 100644
--- a/lisp/obsolete/tpu-extras.el
+++ b/lisp/obsolete/tpu-extras.el
@@ -422,8 +422,4 @@ A repeat count means scroll that many sections."
 
 (provide 'tpu-extras)
 
-;; Local Variables:
-;; generated-autoload-file: "tpu-edt.el"
-;; End:
-
 ;;; tpu-extras.el ends here