From 680e177b176d6c43cd8b5c41c6ece76447c5a573 Mon Sep 17 00:00:00 2001
From: Yoni Rabkin <yoni@rabkins.net>
Date: Tue, 1 Dec 2020 22:21:42 -0500
Subject: * 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 "    ")
-- 
cgit v1.2.3