1 files changed, 11 insertions, 0 deletions

@@ -398,5 +398,16 @@ the deletion might narrow the column."
   "Notify the user of what phone NUMBER to call."
   (message "Call: %s" number))
 
+;; Make a horizontal rule!
+
+(defun +org-horizontal-rule ()
+  "Make a horizontal rule after the current line."
+  (interactive nil org-mode)
+  (unless (eq (line-beginning-position) (line-end-position))
+    (end-of-line)
+    (newline))
+  (dotimes (_ fill-column)
+    (insert "-")))
+
 (provide '+org)
 ;;; +org.el ends here