commit: Correct a typo from Mats' merge, process.el, thank you the byte-compiler

Aidan Kehoe kehoea at parhasard.net
Wed Aug 24 06:22:56 EDT 2011


changeset:   5555:a39cd9dc92ba
tag:         tip
user:        Aidan Kehoe <kehoea at parhasard.net>
date:        Wed Aug 24 11:22:30 2011 +0100
files:       lisp/ChangeLog lisp/process.el
description:
Correct a typo from Mats' merge, process.el, thank you the byte-compiler

lisp/ChangeLog addition:

2011-08-24  Aidan Kehoe  <kehoea at parhasard.net>

	* process.el (shell-command-on-region):
	Correct typo from the merge, nnot -> not.


diff -r a42e686a01bf -r a39cd9dc92ba lisp/ChangeLog
--- a/lisp/ChangeLog	Wed Aug 24 11:07:26 2011 +0100
+++ b/lisp/ChangeLog	Wed Aug 24 11:22:30 2011 +0100
@@ -1,3 +1,8 @@
+2011-08-24  Aidan Kehoe  <kehoea at parhasard.net>
+
+	* process.el (shell-command-on-region):
+	Correct typo from the merge, nnot -> not.
+
 2011-08-24  Aidan Kehoe  <kehoea at parhasard.net>
 
 	* cl-macs.el (apply-partially):
diff -r a42e686a01bf -r a39cd9dc92ba lisp/process.el
--- a/lisp/process.el	Wed Aug 24 11:07:26 2011 +0100
+++ b/lisp/process.el	Wed Aug 24 11:22:30 2011 +0100
@@ -453,7 +453,7 @@
 						   t)
 						 nil shell-command-switch command))
 	  (let ((shell-buffer (get-buffer "*Shell Command Output*")))
-	    (and shell-buffer (nnot (eq shell-buffer (current-buffer)))
+	    (and shell-buffer (not (eq shell-buffer (current-buffer)))
 		 (kill-buffer shell-buffer)))
 	  ;; Don't muck with mark unless REPLACE says we should.
 	  (and replace swap (exchange-point-and-mark t)))



More information about the XEmacs-Patches mailing list