aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuanma Barranquero2005-07-20 21:48:43 +0000
committerJuanma Barranquero2005-07-20 21:48:43 +0000
commitbd7c852ac7f13c844f9d68902f889d9a6ef5383b (patch)
tree33afbe1a0cec5a0fff8a62d9529dc8f4467ff4ca
parent01cdabc616023c38eb645ea8d1ac74dc848f4eeb (diff)
downloademacs-bd7c852ac7f13c844f9d68902f889d9a6ef5383b.tar.gz
emacs-bd7c852ac7f13c844f9d68902f889d9a6ef5383b.zip
(s-region-bind): Doc fix.
(s-region-move-p1, s-region-move-p2): Fix typos in docstrings.
-rw-r--r--lisp/s-region.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/s-region.el b/lisp/s-region.el
index d3fa6b1f307..b28ab222434 100644
--- a/lisp/s-region.el
+++ b/lisp/s-region.el
@@ -63,12 +63,12 @@
63 (error "Non-vector key: %S" key))) 63 (error "Non-vector key: %S" key)))
64 64
65(defun s-region-move-p1 (&rest arg) 65(defun s-region-move-p1 (&rest arg)
66 "This is an overlay function to point-moving keys that are interactive \"p\"" 66 "This is an overlay function to point-moving keys that are interactive \"p\"."
67 (interactive "p") 67 (interactive "p")
68 (apply (function s-region-move) arg)) 68 (apply (function s-region-move) arg))
69 69
70(defun s-region-move-p2 (&rest arg) 70(defun s-region-move-p2 (&rest arg)
71 "This is an overlay function to point-moving keys that are interactive \"P\"" 71 "This is an overlay function to point-moving keys that are interactive \"P\"."
72 (interactive "P") 72 (interactive "P")
73 (apply (function s-region-move) arg)) 73 (apply (function s-region-move) arg))
74 74
@@ -83,10 +83,10 @@
83 (delete-overlay s-region-overlay)) 83 (delete-overlay s-region-overlay))
84 84
85(defun s-region-bind (keylist &optional map) 85(defun s-region-bind (keylist &optional map)
86 "Bind shifted keys in KEYLIST to s-region-move-p1 or s-region-move-p2. 86 "Bind shifted keys in KEYLIST to `s-region-move-p1' or `s-region-move-p2'.
87Each key in KEYLIST is shifted and bound to one of the s-region-move 87Each key in KEYLIST is shifted and bound to one of the `s-region-move'
88functions provided it is already bound to some command or other. 88functions provided it is already bound to some command or other.
89Optional third argument MAP specifies keymap to add binding to, defaulting 89Optional second argument MAP specifies keymap to add binding to, defaulting
90to global keymap." 90to global keymap."
91 (let ((p2 (list 'scroll-up 'scroll-down 91 (let ((p2 (list 'scroll-up 'scroll-down
92 'beginning-of-buffer 'end-of-buffer))) 92 'beginning-of-buffer 'end-of-buffer)))