diff options
| author | Pavel Janík <Pavel@Janik.cz> | 2001-11-29 08:18:25 +0000 |
|---|---|---|
| committer | Pavel Janík <Pavel@Janik.cz> | 2001-11-29 08:18:25 +0000 |
| commit | d97e62d2176d4711bbf5dcc6992ec0b33828773e (patch) | |
| tree | 382a4b6e5e455c5042d1adad77b1d351a7a4ebe0 | |
| parent | b37017c6dddadaba74c21443576d8c414effa5f8 (diff) | |
(studlify-word, studlify-region, studlify-buffer): Fix doc-string.
(studlify-buffer): Add autoload cookie.
| -rw-r--r-- | lisp/play/studly.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/play/studly.el b/lisp/play/studly.el index 26d2a41bc0..474f969ae0 100644 --- a/lisp/play/studly.el +++ b/lisp/play/studly.el @@ -18,7 +18,7 @@ ;;;###autoload (defun studlify-region (begin end) - "Studlify-case the region" + "Studlify-case the region." (interactive "*r") (save-excursion (goto-char begin) @@ -52,7 +52,7 @@ ;;;###autoload (defun studlify-word (count) - "Studlify-case the current word, or COUNT words if given an argument" + "Studlify-case the current word, or COUNT words if given an argument." (interactive "*p") (let ((begin (point)) end rb re) (forward-word count) @@ -60,8 +60,9 @@ (setq rb (min begin end) re (max begin end)) (studlify-region rb re))) +;;;###autoload (defun studlify-buffer () - "Studlify-case the current buffer" + "Studlify-case the current buffer." (interactive "*") (studlify-region (point-min) (point-max))) |