;;; -*- lexical-binding: t; -*-

(require 'syd/base)

;; Display form-feed characters (typically rendered as ^L) as full-line
;; horizontal rules.
(use-package form-feed-st
  :hook ((prog-mode . form-feed-st-mode)
         (text-mode . form-feed-st-mode))
  :config
  (custom-theme-set-faces
   'user
   `(form-feed-st-line
     ((t :strike-through
	 ,(plist-get (custom-face-attributes-get font-lock-comment-face
						 (selected-frame))
		     :foreground))))))
(provide 'syd/form-feed)