;;; Global constants
;;
-(defconst elpher-version "2.10.0"
+(defconst elpher-version "2.10.2"
"Current version of elpher.")
(defconst elpher-margin-width 6
(2 'elpher-gemini-heading2)
(3 'elpher-gemini-heading3)
(_ 'default)))
- (fill-column (/ (* fill-column
+ (fill-column (if (face-font 'default) (/ (* fill-column
(font-get (font-spec :name (face-font 'default)) :size))
- (font-get (font-spec :name (face-font face)) :size))))
+ (font-get (font-spec :name (face-font face)) :size)) fill-column))
(unless (display-graphic-p)
(insert (make-string level ?#) " "))
(insert (propertize header 'face face))