403Webshell
Server IP : 217.160.0.212  /  Your IP : 216.73.216.71
Web Server : Apache
System : Linux www 6.18.52-i1-ampere #1203 SMP Mon Sep 14 18:29:59 CEST 2026 aarch64
User : sws1073854427 ( 1073854427)
PHP Version : 8.4.23
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : OFF  |  Sudo : OFF  |  Pkexec : OFF
Directory :  /usr/share/emacs/28.2/lisp/obsolete/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :


[ Back ]     

Current File : /usr/share/emacs/28.2/lisp/obsolete/yow.elc
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\300\301!\210\302\303\304\305\306\307\310\311&\210\312\313\314\315\316DD\317\320\321%\207" [require cookie1 custom-declare-group yow nil "Quote random zippyisms." :prefix "yow-" :group games custom-declare-variable yow-file funcall function #[0 "\301\302\"\207" [data-directory expand-file-name "yow.lines"] 3 ""] "File containing pertinent pinhead phrases." :type file] 8)
(defconst yow-load-message "Am I CONSING yet?...")
(defconst yow-after-load-message "I have SEEN the CONSING!!")
#@105 Return or display a random Zippy quotation.  With prefix arg, insert it.

(fn &optional INSERT DISPLAY)
(defalias 'yow #[512 "\303	\n#\203\f\211c\207\204\207\304\305\"\207" [yow-file yow-load-message yow-after-load-message cookie message "%s"] 6 (#$ . 586) "P\np"])
#@186 Read a Zippyism from the minibuffer with completion, prompting with PROMPT.
If optional second arg is non-nil, require input to match a completion.

(fn PROMPT &optional REQUIRE-MATCH)
(defalias 'read-zippyism #[513 "\303	\n%\207" [yow-file yow-load-message yow-after-load-message cookie-read] 8 (#$ . 866)])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put read-zippyism speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@102 Prompt with completion for a known Zippy quotation, and insert it at point.

(fn &optional ZIPPYISM)
(defalias 'insert-zippyism #[256 "\211c\207" [] 2 (#$ . 1324) (byte-code "\303\304\305	\n%\266\202C\207" [yow-file yow-load-message yow-after-load-message "Pinhead wisdom: " t cookie-read] 8)])
#@117 Return a list of all Zippy quotes matching REGEXP.
If called interactively, display a list of matches.

(fn REGEXP)
(defalias 'apropos-zippy #[257 "\301\302\303!#\207" [yow-file cookie-apropos called-interactively-p interactive] 6 (#$ . 1629) "sApropos Zippy (regexp): "])
#@28 Zippy goes to the analyst.
(defalias 'psychoanalyze-pinhead #[0 "\301!\207" [yow-file cookie-doctor] 2 (#$ . 1910) nil])
(provide 'yow)

Youez - 2016 - github.com/yon3zu
LinuXploit