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@LEAVENS on Mon Sep 15 16:19:43 2003 ;;; from file d:/emacs/ecb/ecb-cycle.el ;;; in Emacs version 21.3.1 ;;; with bytecomp version 2.85.4.1 ;;; 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 "`ecb-cycle.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\300\302!\210\303\304\305\306\307\310\311\312&\207" [require ecb-compilation ecb-layout custom-declare-group ecb-cycle nil "Setting for cycling through misc ECB buffers." :group ecb :prefix "ecb-cycle-"] 8) #@601 Cycle through all compilation buffers currently open. The choosen compilation buffer is displayed within the compilation window `ecb-compile-window' (if this window doesn't exist then an error is displayed). If the currently opened buffer within the compilation window is not a compilation buffer, we jump to the first compilation buffer. If not we try to loop through all compilation buffers. If we hit the end we go back to the beginning. If CHOOSE-BUFFER is not nil then the user will be prompted for the compilation-buffer to switch to. Afterwards always the compile-window of ECB is selected. (defalias 'ecb-cycle-through-compilation-buffers #[(&optional choose-buffer) "\306\307N@\247\204\f\310\311!\207\203\312\216\313 !\210\314\315\316\317 \"!)\207\317 \320!\321\f!\322\322\n\2048\310\323!\210\324\f!\204E\325\326\n\"\202d\327 \n\"\211A\211T\nGU\203^\325\326\n\"\202d\325T\n\"-\207" [choose-buffer ecb-adviceable-functions compilation-buffers ecb-compile-window current-buffer current-buffer-name ecb-compile-window-height saved-value ecb-error "This command needs a durable compile window!" ((ecb-activate-adviced-functions ecb-advice-window-functions)) ecb-activate-adviced-functions switch-to-buffer completing-read "ECB compilation buffer: " ecb-compilation-get-buffers window-buffer buffer-name nil "No compilation buffers available." ecb-compilation-buffer-p ecb-cycle-set-compilation-buffer 0 assoc current index] 5 (#$ . 827) "P"]) #@43 Set the buffer in the compilation window. (defalias 'ecb-cycle-set-compilation-buffer #[(index compilation-buffers) " 8@\304\216\305!\210\306\n!*\207" [index compilation-buffers buffer-name ecb-adviceable-functions ((ecb-activate-adviced-functions ecb-advice-window-functions)) ecb-activate-adviced-functions switch-to-buffer] 2 (#$ . 2306)]) (provide 'ecb-cycle)