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 | 1dbc941a599ebcdc779992453207e1f61f450bd6 (patch) | |
tree | 8af61284823fae89eb33ba589f1558236001291d /lisp/gnus | |
parent | 9dfda22f23342984d686e9c8cb85fa52e2183353 (diff) |
(rfc2047-decode-region): Don't skip past `start', which
could happen if the text is only composed of spaces and/or tabs.
Diffstat (limited to 'lisp/gnus')
-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 d0a9a7209f0..82cd077d0db 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) ?\"))) |