+2008-08-29 Katsumi Yamaoka <yamaoka@jpl.org>
+
+ * gnus-spec.el (gnus-parse-simple-format): Remove trailing whitespace.
+
2008-08-21 Teodor Zlatanov <tzz@lifelogs.com>
* gnus-registry.el (gnus-registry-max-track-groups): New variable to
(when result
(if dontinsert
result
- (cons 'insert result)))
+ `(progn
+ (insert ,@result)
+ (if (bolp)
+ ;; remove trailing whitespaces from the line
+ (progn
+ (end-of-line 0)
+ (skip-chars-backward " ")
+ (delete-region (point) (point-at-eol))
+ (forward-line 1))))))
(cond ((stringp result)
result)
((consp result)