;ELC ;;; compiled by kwzh@hal.gnu.ai.mit.edu on Mon Apr 17 19:51:30 1995 ;;; from file /gd/gnu/emacs/19.0/lisp/spook.el ;;; emacs version 19.28.90.26. ;;; bytecomp version FSF 2.10 ;;; optimization is on. ;;; this file uses opcodes which do not exist in Emacs 18. (if (and (boundp 'emacs-version) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19"))) (error "`/gd/gnu/emacs/19.0/lisp/spook.el' was compiled for Emacs 19")) (require (quote cookie1)) #@34 Keep your favorite phrases here. (defvar spook-phrases-file (concat data-directory "spook.lines") (#$ . 505)) #@37 Default number of phrases to insert (defvar spook-phrase-default-count 15 (#$ . 621)) #@57 Adds that special touch of class to your outgoing mail. (defalias 'spook #[nil "À \nÃÄ$‡" [cookie-insert spook-phrases-file spook-phrase-default-count "Checking authorization..." "Checking authorization...Approved"] 5 (#$ . 713) nil]) #@65 Return a vector containing the lines from `spook-phrases-file'. (defalias 'snarf-spooks #[nil "À ÂÃ#‡" [cookie-snarf spook-phrases-file "Checking authorization..." "Checking authorization...Approved"] 4 (#$ . 954)])