branch: externals/rt-liberation
commit 680e177b176d6c43cd8b5c41c6ece76447c5a573
Author: Yoni Rabkin <y...@rabkins.net>
Commit: Yoni Rabkin <y...@rabkins.net>
* rt-liberation.el: remove leading blank lines
---
rt-liberation.el | 6 ++++++
1 file changed, 6 insertions(+)
diff --git a/rt-liberation.el b/rt-liberation.el
index 4af325f..1adee43 100644
--- a/rt-liberation.el
+++ b/rt-liberation.el
@@ -1309,6 +1309,12 @@ ASSOC-BROWSER if non-nil should be a ticket browser."
(with-temp-buffer
(insert content)
+ (save-excursion
+ (goto-char (point-min))
+ (re-search-forward "[[:graph:]]" (point-max) t)
+ (forward-line -1)
+ (flush-lines "^[[:space:]]+$" (point-min) (point)))
+
;; Convert the 9 leading whitespaces from RT's comment lines.
(goto-char (point-min))
(insert " ")
