Mercurial > emacs
diff lisp/subr.el @ 49597:e88404e8f2cf
Trailing whitespace deleted.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Tue, 04 Feb 2003 12:29:42 +0000 |
parents | a144c40bb984 |
children | c0dd4de41e91 d7ddb3e565de |
line wrap: on
line diff
--- a/lisp/subr.el Tue Feb 04 12:03:59 2003 +0000 +++ b/lisp/subr.el Tue Feb 04 12:29:42 2003 +0000 @@ -1058,7 +1058,7 @@ (defun process-put (process propname value) "Change PROCESS' PROPNAME property to VALUE. It can be retrieved with `(process-get PROCESS PROPNAME)'." - (set-process-plist process + (set-process-plist process (plist-put (process-plist process) propname value))) @@ -1480,7 +1480,7 @@ if FUNCTION adjusts point before or after inserting the object. If UNDO is present and non-nil, it is a function that will be called by `yank-pop' to undo the insertion of the current object. It is - called with two arguments, the start and end of the current region. + called with two arguments, the start and end of the current region. FUNCTION may set `yank-undo-function' to override the UNDO value." (let* ((handler (and (stringp string) (get-text-property 0 'yank-handler string))) @@ -1496,7 +1496,7 @@ (setq yank-undo-function (nth 3 handler))) ;; UNDO (if (nth 4 handler) ;; COMMAND (setq this-command (nth 4 handler))))) - + (defun insert-buffer-substring-no-properties (buf &optional start end) "Insert before point a substring of buffer BUFFER, without text properties. BUFFER may be a buffer or a buffer name.