MMCT TEAM
Server IP : 111.118.215.189  /  Your IP : 3.128.31.200
Web Server : Apache
System : Linux md-in-83.webhostbox.net 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64
User : a1673wkz ( 2475)
PHP Version : 8.2.25
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : ON
Directory (0755) :  /usr/share/emacs/24.3/lisp/play/

[  Home  ][  C0mmand  ][  Upload File  ]

Current File : //usr/share/emacs/24.3/lisp/play/studly.elc
;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:06:37 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/play/studly.el
;;; in Emacs version 24.3.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


#@27 Studlify-case the region.
(defalias 'studlify-region #[(begin end) "\212b\210``	X\205\205\306\307!?\205\205\310v\210\311v\210`]\310v\210\312`	^\313b\210`W\203;\fg\\\310u\210\202+\fg\\b\210`W\203g\211\f\\\314\246\315U\203yg\211\316Y\203b
\317X\206k
\320Y\205k
\321X)\203y\322\310!\210\323\n\324\"c\210\310u\210\202B`+\202)\207" [begin end c word-end offset ch looking-at "\\W*\\'" 1 -1 0 nil 4 2 97 122 65 90 delete-char logxor 32] 4 (#$ . 554) "*r"])
#@70 Studlify-case the current word, or COUNT words if given an argument.
(defalias 'studlify-word #[(count) "`\305\211\211\fv\210`\n^\n]\306	\",\207" [re rb end begin count nil studlify-region] 4 (#$ . 1041) "*p"])
#@35 Studlify-case the current buffer.
(defalias 'studlify-buffer #[nil "\300ed\"\207" [studlify-region] 3 (#$ . 1268) "*"])
(provide 'studly)

MMCT - 2023