Deprecated: The each() function is deprecated. This message will be suppressed on further calls in /home/zhenxiangba/zhenxiangba.com/public_html/phproxy-improved-master/index.php on line 456
;ELC ;;; Compiled by leavens@larch.cs.iastate.edu on Wed Sep 13 10:50:20 2000 ;;; from file /home/bambam/leavens/emacs/unscroll.el ;;; in Emacs version 20.5.2 ;;; with bytecomp version 2.56 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. (if (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19.29"))) (error "`unscroll.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; #@47 Cursor position for next call to \[unscroll]. (defvar unscroll-point (make-marker) (#$ . 614)) #@44 Window start for next call to \[unscroll]. (defvar unscroll-window-start (make-marker) (#$ . 715)) #@49 Horizontal scroll for next call to \[unscroll]. (defvar unscroll-hscroll nil (#$ . 820)) #@56 Revert to last position before the start of scrolling. (defalias 'unscroll #[nil "b\210\303\304 \"\210\305\304\n\"\207" [unscroll-point unscroll-window-start unscroll-hscroll set-window-start nil set-window-hscroll] 3 (#$ . 915) nil]) (byte-code "\300\301\302\303#\210\300\304\302\303#\210\300\305\302\303#\210\300\306\302\303#\207" [put scroll-up unscrollable t scroll-down scroll-left scroll-right] 4) (defalias 'unscroll-maybe-remember #[nil "\304N?\205 `\305\223\210\n\306 \305\223\210\307 \211\207" [last-command unscroll-point unscroll-window-start unscroll-hscroll unscrollable nil window-start window-hscroll] 3]) (byte-code "\300\301\302\303\304$\210\305\301\306\"\210\300\307\310\303\304$\210\305\307\306\"\210\300\311\312\303\304$\210\305\311\306\"\210\300\313\314\303\304$\210\305\313\306\"\207" [ad-add-advice scroll-up (remember-for-unscroll nil t (advice lambda nil "Remember where we started from, for `unscroll'." (unscroll-maybe-remember))) before nil ad-activate-on t scroll-down (remember-for-unscroll nil t (advice lambda nil "Remember where we started from, for `unscroll'." (unscroll-maybe-remember))) scroll-left (remember-for-unscroll nil t (advice lambda nil "Remember where we started from, for `unscroll'." (unscroll-maybe-remember))) scroll-right (remember-for-unscroll nil t (advice lambda nil "Remember where we started from, for `unscroll'." (unscroll-maybe-remember)))] 5)