mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-28 07:45:00 +00:00
Code Issues Releases Activity

(nil-blank-string): Doc fix.

Browse Source
This commit is contained in:
Juanma Barranquero 2007-10-26 08:53:45 +00:00
parent 4990598e2c
commit 3ced278069
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lisp/eshell/em-unix.el
View File

@ -974,12 +974,11 @@ Show wall-clock time elapsed during execution of COMMAND.")
(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."