mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-01 20:06:00 +00:00
Code Issues Releases Activity

(kmacro-insert-counter, kmacro-set-counter,

Browse Source 
kmacro-start-macro-or-insert-counter, kmacro-step-edit-prefix-commands):
Fix typos in docstrings.
(kmacro-call-ring-2nd, kmacro-call-ring-2nd-repeat): Doc fixes.
This commit is contained in:
Juanma Barranquero 2007-01-14 03:22:45 +00:00
parent 7cb0c23ba4
commit c796a0b64d
2 changed files with 19 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
lisp/ChangeLog
View File

@ -1,7 +1,16 @@
2007-01-14 Juanma Barranquero <lekktu@gmail.com>
* kmacro.el (kmacro-insert-counter, kmacro-set-counter)
(kmacro-start-macro-or-insert-counter)
(kmacro-step-edit-prefix-commands): Fix typos in docstrings.
(kmacro-call-ring-2nd, kmacro-call-ring-2nd-repeat): Doc fixes.
* emulation/keypad.el (keypad-setup): Fix typos in docstring.
2007-01-13 Mathias Dahl <mathias.dahl@gmail.com> 2007-01-13 Mathias Dahl <mathias.dahl@gmail.com>
* tumme.el (tumme-cmd-rotate-original-options): Add -outfile * tumme.el (tumme-cmd-rotate-original-options): Add -outfile
option. Remove redirect character ">". option. Remove redirect character ">".
2007-01-13 Juanma Barranquero <lekktu@gmail.com> 2007-01-13 Juanma Barranquero <lekktu@gmail.com>
@ -26,7 +35,7 @@
* hexl.el (hexlify-buffer, dehexlify-buffer): Don't complain and don't * hexl.el (hexlify-buffer, dehexlify-buffer): Don't complain and don't
activate undo when undo is not active. activate undo when undo is not active.
Reported by Chris <christopher.ian.moore@gmail.com>. Reported by Chris Moore <christopher.ian.moore@gmail.com>.
2007-01-10 Stefan Monnier <monnier@iro.umontreal.ca> 2007-01-10 Stefan Monnier <monnier@iro.umontreal.ca>

15
lisp/kmacro.el
View File

@ -1,6 +1,7 @@
;;; kmacro.el --- enhanced keyboard macros ;;; kmacro.el --- enhanced keyboard macros
;; Copyright (C) 2002, 2003, 2004, 2005, 2006 Free Software Foundation, Inc. ;; Copyright (C) 2002, 2003, 2004, 2005, 2006,
;; 2007 Free Software Foundation, Inc.
;; Author: Kim F. Storm <storm@cua.dk> ;; Author: Kim F. Storm <storm@cua.dk>
;; Keywords: keyboard convenience ;; Keywords: keyboard convenience
@ -255,7 +256,7 @@ macro to be executed before appending to it."
(defun kmacro-insert-counter (arg) (defun kmacro-insert-counter (arg)
"Insert macro counter and increment with ARG or 1 if missing. "Insert macro counter and increment with ARG or 1 if missing.
With \\[universal-argument], insert previous kmacro-counter (but do not modify counter)." With \\[universal-argument], insert previous `kmacro-counter' (but do not modify counter)."
(interactive "P") (interactive "P")
(if kmacro-initial-counter-value (if kmacro-initial-counter-value
(setq kmacro-counter kmacro-initial-counter-value (setq kmacro-counter kmacro-initial-counter-value
@ -283,7 +284,7 @@ With \\[universal-argument], insert previous kmacro-counter (but do not modify c
(defun kmacro-set-counter (arg) (defun kmacro-set-counter (arg)
"Set kmacro-counter to ARG or prompt if missing. "Set `kmacro-counter' to ARG or prompt if missing.
With \\[universal-argument] prefix, reset counter to its value prior to this iteration of the macro." With \\[universal-argument] prefix, reset counter to its value prior to this iteration of the macro."
(interactive "NMacro counter value: ") (interactive "NMacro counter value: ")
(if (not (or defining-kbd-macro executing-kbd-macro)) (if (not (or defining-kbd-macro executing-kbd-macro))
@ -453,14 +454,14 @@ Optional arg EMPTY is message to print if no macros are defined."
(defun kmacro-call-ring-2nd (arg) (defun kmacro-call-ring-2nd (arg)
"Execute second keyboard macro at in macro ring." "Execute second keyboard macro in macro ring."
(interactive "P") (interactive "P")
(unless (kmacro-ring-empty-p) (unless (kmacro-ring-empty-p)
(kmacro-exec-ring-item (car kmacro-ring) arg))) (kmacro-exec-ring-item (car kmacro-ring) arg)))
(defun kmacro-call-ring-2nd-repeat (arg) (defun kmacro-call-ring-2nd-repeat (arg)
"Execute second keyboard macro at in macro ring. "Execute second keyboard macro in macro ring.
This is like `kmacro-call-ring-2nd', but allows repeating macro commands This is like `kmacro-call-ring-2nd', but allows repeating macro commands
without repeating the prefix." without repeating the prefix."
(interactive "P") (interactive "P")
@ -670,7 +671,7 @@ the current value of `kmacro-counter').
When defining/executing macro, inserts macro counter and increments When defining/executing macro, inserts macro counter and increments
the counter with ARG or 1 if missing. With \\[universal-argument], the counter with ARG or 1 if missing. With \\[universal-argument],
inserts previous kmacro-counter (but do not modify counter). inserts previous `kmacro-counter' (but do not modify counter).
The macro counter can be modified via \\[kmacro-set-counter] and \\[kmacro-add-counter]. The macro counter can be modified via \\[kmacro-set-counter] and \\[kmacro-add-counter].
The format of the counter can be modified via \\[kmacro-set-format]." The format of the counter can be modified via \\[kmacro-set-format]."
@ -941,7 +942,7 @@ following additional answers: `insert', `insert-1', `replace', `replace-1',
(defvar kmacro-step-edit-prefix-commands (defvar kmacro-step-edit-prefix-commands
'(universal-argument universal-argument-more universal-argument-minus '(universal-argument universal-argument-more universal-argument-minus
digit-argument negative-argument) digit-argument negative-argument)
"Commands which builds up a prefix arg for the current command") "Commands which build up a prefix arg for the current command.")
(defun kmacro-step-edit-prompt (macro index) (defun kmacro-step-edit-prompt (macro index)
;; Show step-edit prompt ;; Show step-edit prompt