Mercurial > emacs

changeset 85660:7dd9ef0af1e0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(nil-blank-string): Doc fix.
author Juanma Barranquero <lekktu@gmail.com>
date Fri, 26 Oct 2007 08:53:45 +0000
parents be317780de60
children 56b054631eed
files lisp/eshell/em-unix.el
diffstat 1 files changed, 4 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/eshell/em-unix.el	Fri Oct 26 08:07:17 2007 +0000
+++ b/lisp/eshell/em-unix.el	Fri Oct 26 08:53:45 2007 +0000
@@ -974,12 +974,11 @@
   (if eshell-diff-window-config
       (set-window-configuration eshell-diff-window-config)))
 
-(defun nil-blank-string ( string )
-  "if a string is all blanks return nil, if there are non-blank characters
-return the string"
+(defun nil-blank-string (string)
+  "Return STRING, or nil if STRING contains only non-blank characters."
   (cond
-   ((string-match "[^[:blank:]]" string ) string)
-   (nil)))
+    ((string-match "[^[:blank:]]" string) string)
+    (nil)))
 
 (defun eshell/diff (&rest args)
   "Alias \"diff\" to call Emacs `diff' function."