+
+(defvar tf-internal-var-recenter 1)
+(defun tf-internal-recenter-toggle-my ()
+ (interactive)
+ (recenter tmpp)
+ (setq tf-internal-var-recenter (- 0 tf-internal-var-recenter)))
+
+(defun tf-example-timer-recenter ()
+ "Changes the screen display every 3 seconds, thus ensuring that you
+ don't time out of ssh sessions."
+ tf-run-with-idle-timer 3 t 3 t nil 'tf-internal-recenter-toggle-my)
+
+
+
+