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@CMC3251632-A on Fri Aug 09 22:33:21 2002 ;;; from file d:/emacs/notebook.lc.el ;;; in Emacs version 21.2.1 ;;; with bytecomp version 2.85 ;;; 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 "`notebook.lc.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\304\305\306\307#\210\310\311\312\313\"\210\314 B\315\316\317\320!\207" [haskell-hugs-program-name process-coding-system-alist scheme-program-name version-control modify-coding-system-alist file "\\.\\(scm\\|def\\|ltx\\|tex\\|texinfo\\|hs\\|lhs\\|txt\\|[Ch]\\|lh\\|jml\\|java\\|jml-refined\\|java-refined\\)$" raw-text-unix "e:/unsup/hugs/hugs.exe" add-hook inferior-scheme-mode-hook #[nil "\300\301M\207" [chez "(load \"~/src/scheme/chez-compat.scm\")"] 2] ("scheme" . raw-text-unix) "sh -c d:/bin/scm342" t set-message-beep Exclamation] 4) #@37 For bash (cygwin 18) under Emacs 20 (defalias 'my-shell-setup #[nil "\304\305\305\306\307\301!\207" [comint-scroll-show-maximum-output comint-completion-addsuffix comint-eol-on-send w32-quote-process-args this t 34 make-variable-buffer-local] 2 (#$ . 1152)]) (byte-code "\301\302\303\"\210\304\305BB\306 \210\307\310\311\"\210\307\312\313\"\210\307\314\315\"\210\307\316\317\"\210\307\320\321\"\210\307\322\323\"\210\307\324\325\"\210\307\326\327\"\210\307\330\331\"\210\307\332\333\"\210\307\334\335\"\210\307\336\337\"\207" [process-coding-system-alist add-hook shell-mode-hook my-shell-setup ("bash" . raw-text-unix) ("shell" . raw-text-unix) delete-selection-mode global-set-key [C-kp-home] beginning-of-buffer [C-kp-end] end-of-buffer [kp-home] beginning-of-line [kp-end] end-of-line [C-kp-left] backward-word [C-kp-right] forward-word [C-kp-up] (lambda nil (interactive) (forward-paragraph -1)) [C-kp-down] forward-paragraph [kp-delete] delete-char [C-S-kp-left] #[nil "\300\301!\207" [mark-word -1] 2 nil nil] [C-S-kp-right] mark-word "" advertised-undo] 3)