# HG changeset patch # User Juanma Barranquero # Date 1281043863 -7200 # Node ID de86f640dbaa94da2a1183ea4abc77b49a4fced8 # Parent ad23e0fe40f4c4dd2cff8ee38736cc5da81ebd7a * emulation/pc-select.el: Fix typos in docstrings. diff -r ad23e0fe40f4 -r de86f640dbaa lisp/ChangeLog --- a/lisp/ChangeLog Wed Aug 04 20:04:29 2010 +0200 +++ b/lisp/ChangeLog Thu Aug 05 23:31:03 2010 +0200 @@ -1,3 +1,9 @@ +2010-08-05 Juanma Barranquero + + * emulation/pc-select.el (pc-selection-mode-hook) + (copy-region-as-kill-nomark, beginning-of-buffer-mark) + (pc-selection-mode): Fix typos in docstrings. + 2010-08-04 Stefan Monnier * simple.el (exchange-dot-and-mark): Mark obsolete, finally. diff -r ad23e0fe40f4 -r de86f640dbaa lisp/emulation/pc-select.el --- a/lisp/emulation/pc-select.el Wed Aug 04 20:04:29 2010 +0200 +++ b/lisp/emulation/pc-select.el Thu Aug 05 23:31:03 2010 +0200 @@ -108,7 +108,7 @@ :group 'pc-select) (defcustom pc-selection-mode-hook nil - "The hook to run when pc-selection-mode is toggled." + "The hook to run when PC Selection mode is toggled." :type 'hook :group 'pc-select) @@ -259,7 +259,7 @@ (provide 'pc-select) (defun copy-region-as-kill-nomark (beg end) - "Save the region as if killed; but don't kill it; deactivate mark. + "Save the region as if killed, but don't kill it; deactivate mark. If `interprogram-cut-function' is non-nil, also save the text for a window system cut and paste. @@ -567,7 +567,7 @@ ;;;;;;;;;;;;;;;;;;;; (defun backward-char-mark (&optional arg) -"Ensure mark is active; move point left ARG characters (right if ARG negative). + "Ensure mark is active; move point left ARG characters (right if ARG negative). On attempt to pass beginning or end of buffer, stop and signal error." (interactive "p") (pc-select-ensure-mark) @@ -631,7 +631,7 @@ (defun scroll-up-mark (&optional arg) -"Ensure mark is active; scroll upward ARG lines; or near full screen if no ARG. + "Ensure mark is active; scroll upward ARG lines; or near full screen if no ARG. A near full screen is `next-screen-context-lines' less than a full screen. Negative ARG means scroll downward. When calling from a program, supply a number as argument or nil. @@ -652,7 +652,7 @@ of the accessible part of the buffer. Don't use this command in Lisp programs! -\(goto-char (p\oint-min)) is faster and avoids clobbering the mark." +\(goto-char (point-min)) is faster and avoids clobbering the mark." (interactive "P") (pc-select-ensure-mark) (let ((size (- (point-max) (point-min)))) @@ -839,7 +839,7 @@ ;;;###autoload (define-minor-mode pc-selection-mode - "Change mark behavior to emulate Motif, MAC or MS-Windows cut and paste style. + "Change mark behavior to emulate Motif, Mac or MS-Windows cut and paste style. This mode enables Delete Selection mode and Transient Mark mode.