Mercurial > emacs
changeset 105244:1308a0fb85e9
Fix doc string.
| author | Vinicius Jose Latorre <viniciusjl@ig.com.br> |
|---|---|
| date | Mon, 28 Sep 2009 01:57:33 +0000 |
| parents | 4b2a0c5f8552 |
| children | 41de8bc6a7be |
| files | lisp/ChangeLog lisp/whitespace.el |
| diffstat | 2 files changed, 10 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Mon Sep 28 01:41:23 2009 +0000 +++ b/lisp/ChangeLog Mon Sep 28 01:57:33 2009 +0000 @@ -18,6 +18,12 @@ * cedet/mode-local.el: * cedet/pulse.el: New files. +2009-09-27 Vinicius Jose Latorre <viniciusjl@ig.com.br> + + * whitespace.el (whitespace-trailing-regexp) + (whitespace-empty-at-bob-regexp, whitespace-empty-at-eob-regexp): + Fix doc string. + 2009-09-27 Chong Yidong <cyd@stupidchicken.com> * menu-bar.el: Remove menu-bar-ediff-misc-menu from the Tools
--- a/lisp/whitespace.el Mon Sep 28 01:41:23 2009 +0000 +++ b/lisp/whitespace.el Mon Sep 28 01:57:33 2009 +0000 @@ -6,7 +6,7 @@ ;; Author: Vinicius Jose Latorre <viniciusjl@ig.com.br> ;; Maintainer: Vinicius Jose Latorre <viniciusjl@ig.com.br> ;; Keywords: data, wp -;; Version: 12 +;; Version: 12.0 ;; X-URL: http://www.emacswiki.org/cgi-bin/wiki/ViniciusJoseLatorre ;; This file is part of GNU Emacs. @@ -2310,7 +2310,7 @@ (defun whitespace-trailing-regexp (limit) - "Match trailing spaces which does not contain the point at end of line." + "Match trailing spaces which do not contain the point at end of line." (let ((status t)) (while (if (re-search-forward whitespace-trailing-regexp limit t) (save-match-data @@ -2320,14 +2320,14 @@ (defun whitespace-empty-at-bob-regexp (limit) - "Match spaces at beginning of buffer which does not contain the point at \ + "Match spaces at beginning of buffer which do not contain the point at \ beginning of buffer." (and (/= whitespace-point 1) (re-search-forward whitespace-empty-at-bob-regexp limit t))) (defun whitespace-empty-at-eob-regexp (limit) - "Match spaces at end of buffer which does not contain the point at end of \ + "Match spaces at end of buffer which do not contain the point at end of \ buffer." (and (/= whitespace-point (1+ (buffer-size))) (re-search-forward whitespace-empty-at-eob-regexp limit t)))