From 77bf50cb330807039cc84138fb84870bd6d532e2 Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Mon, 8 Aug 2022 11:13:58 +0200 Subject: [PATCH] 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. --- lisp/obsolete/tpu-edt.el | 29 ----------------------------- lisp/obsolete/tpu-extras.el | 4 ---- 2 files changed, 33 deletions(-) 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 -- 2.39.2