;;; compiled by eric@geech.gnu.ai.mit.edu on Fri Mar 26 21:06:58 1993 ;;; from file /gd/gnu/emacs/19.0/lisp/studly.el ;;; emacs version 19.0.509. ;;; bytecomp version FSF 2.08 ;;; optimization is on. (fset 'studlify-region #[(begin end) "b`` X!?!!`]!` ^ \n b`\nWE g\\ !1 g\\ b`\nWg   \\\"UgYuXYX)! \"c!N`+)" [begin end looking-at "\\W*\\'" forward-word 1 backward-word 0 nil c word-end offset forward-char % 4 2 ch 97 122 65 90 delete-char logxor 32] 4 "\ Studlify-case the region" "*r"]) (fset 'studlify-word #[(count) "`!` ^ ]\n \"," [nil re rb end begin forward-word count studlify-region] 4 "\ Studlify-case the current word, or COUNT words if given an argument" "*p"]) (fset 'studlify-buffer #[nil "ed\"" [studlify-region] 3 "\ Studlify-case the current buffer" "*"])