emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 25636fcf52 1/3: Revert "Don't autoload obsolete library tpu-extra


From: Stefan Kangas
Subject: master 25636fcf52 1/3: Revert "Don't autoload obsolete library tpu-extras.el"
Date: Mon, 8 Aug 2022 07:47:23 -0400 (EDT)

branch: master
commit 25636fcf5223341bf415a4014e643f4b2caa446d
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    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 1e3fc0d569..8c4ec8f7e0 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 23f6020fd3..76338cdd24 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



reply via email to

[Prev in Thread] Current Thread [Next in Thread]