diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/+org.el | 11 |
1 files changed, 11 insertions, 0 deletions
| diff --git a/lisp/+org.el b/lisp/+org.el index 5631fed..fc1caea 100644 --- a/lisp/+org.el +++ b/lisp/+org.el | |||
| @@ -398,5 +398,16 @@ the deletion might narrow the column." | |||
| 398 | "Notify the user of what phone NUMBER to call." | 398 | "Notify the user of what phone NUMBER to call." |
| 399 | (message "Call: %s" number)) | 399 | (message "Call: %s" number)) |
| 400 | 400 | ||
| 401 | ;; Make a horizontal rule! | ||
| 402 | |||
| 403 | (defun +org-horizontal-rule () | ||
| 404 | "Make a horizontal rule after the current line." | ||
| 405 | (interactive nil org-mode) | ||
| 406 | (unless (eq (line-beginning-position) (line-end-position)) | ||
| 407 | (end-of-line) | ||
| 408 | (newline)) | ||
| 409 | (dotimes (_ fill-column) | ||
| 410 | (insert "-"))) | ||
| 411 | |||
| 401 | (provide '+org) | 412 | (provide '+org) |
| 402 | ;;; +org.el ends here | 413 | ;;; +org.el ends here |