diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2009-04-20 16:17:51 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2009-04-20 16:17:51 +0000 |
| commit | 0b177f1f245d45cc7af5b95ea48e5f83dae51099 (patch) | |
| tree | 7ce5404a9621279ec06591a27098ee40fe91e3db | |
| parent | 8d61eead1545297ada5a7a08469d9f556c4a2ee6 (diff) | |
| download | emacs-0b177f1f245d45cc7af5b95ea48e5f83dae51099.tar.gz | |
(rfc2047-decode-region): Don't skip past `start', which
could happen if the text is only composed of spaces and/or tabs.
| -rw-r--r-- | lisp/gnus/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/gnus/rfc2047.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index b73dfffc48a..b58f86509ba 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,8 @@ +2009-04-20 Stefan Monnier <monnier@iro.umontreal.ca> + + * rfc2047.el (rfc2047-decode-region): Don't skip past `start', which + could happen if the text is only composed of spaces and/or tabs. + 2009-03-03 Brian Sniffen <bts@evenmere.org> (tiny change) * gnus-draft.el (gnus-draft-send): Bind gnus-message-setup-hook to nil diff --git a/lisp/gnus/rfc2047.el b/lisp/gnus/rfc2047.el index 6b774644102..c0bdec3c025 100644 --- a/lisp/gnus/rfc2047.el +++ b/lisp/gnus/rfc2047.el @@ -1045,7 +1045,7 @@ other than `\"' and `\\' in quoted strings." (setq start (point)) (setq quoted (eq (char-after) ?\")) (goto-char (point-max)) - (skip-chars-backward " \t") + (skip-chars-backward " \t" start) (if (setq quoted (and quoted (> (point) (1+ start)) (eq (char-before) ?\"))) |