diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2011-11-20 04:48:53 +0100 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2011-11-20 04:48:53 +0100 |
| commit | cd1181dbece7f23a801ce9c56b985f9466cd6511 (patch) | |
| tree | 59d07d411c4de52f8e100fc1d71dbadd9095d1b2 /lisp/mail/feedmail.el | |
| parent | 17e845af732cf7bd0ada49375f014e10deb3d06a (diff) | |
| download | emacs-cd1181dbece7f23a801ce9c56b985f9466cd6511.tar.gz emacs-cd1181dbece7f23a801ce9c56b985f9466cd6511.tar.bz2 emacs-cd1181dbece7f23a801ce9c56b985f9466cd6511.zip | |
Fix typos.
Diffstat (limited to 'lisp/mail/feedmail.el')
| -rw-r--r-- | lisp/mail/feedmail.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/feedmail.el b/lisp/mail/feedmail.el index eaac5c17cd3..43d43617631 100644 --- a/lisp/mail/feedmail.el +++ b/lisp/mail/feedmail.el @@ -2261,9 +2261,9 @@ the counts." (while (string-match feedmail-queue-slug-suspect-regexp slug) (setq slug (replace-match "-" nil nil slug))) ;; collapse multiple hyphens to one (while (string-match "--+" slug) (setq slug (replace-match "-" nil nil slug))) - ;; for tidyness, peel off leading hyphens + ;; for tidiness, peel off leading hyphens (if (string-match "^-*" slug) (setq slug (replace-match "" nil nil slug))) - ;; for tidyness, peel off trailing hyphens + ;; for tidiness, peel off trailing hyphens (if (string-match "-*$" slug) (setq slug (replace-match "" nil nil slug))) slug ) |