From 25636fcf5223341bf415a4014e643f4b2caa446d Mon Sep 17 00:00:00 2001
From: Stefan Kangas <stefan@marxist.se>
Date: Mon, 8 Aug 2022 12:03:30 +0200
Subject: [PATCH] Revert "Don't autoload obsolete library tpu-extras.el"

This reverts commit 77bf50cb330807039cc84138fb84870bd6d532e2.
---
 lisp/obsolete/tpu-edt.el    | 29 +++++++++++++++++++++++++++++
 lisp/obsolete/tpu-extras.el |  4 ++++
 2 files changed, 33 insertions(+)

diff --git a/lisp/obsolete/tpu-edt.el b/lisp/obsolete/tpu-edt.el
index 1e3fc0d569e..8c4ec8f7e09 100644
--- a/lisp/obsolete/tpu-edt.el
+++ b/lisp/obsolete/tpu-edt.el
@@ -2412,6 +2412,35 @@ 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 23f6020fd3a..76338cdd24e 100644
--- a/lisp/obsolete/tpu-extras.el
+++ b/lisp/obsolete/tpu-extras.el
@@ -422,4 +422,8 @@ 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