branch: elpa/telephone-line commit c17c71ae18ad54b8c3d1eddbe78ed82816d06186 Author: Daniel Bordak <dbor...@fastmail.fm> Commit: Daniel Bordak <dbor...@fastmail.fm>
Add missing methods to telephone-line-unicode-separator --- telephone-line-utils.el | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/telephone-line-utils.el b/telephone-line-utils.el index d30c42d15f..2422b1b6dc 100644 --- a/telephone-line-utils.el +++ b/telephone-line-utils.el @@ -156,10 +156,16 @@ color1 and color2." (cl-defmethod telephone-line-separator-height ((obj telephone-line-separator)) (or telephone-line-height (frame-char-height))) +(cl-defmethod telephone-line-separator-height ((obj telephone-line-unicode-separator)) + (frame-char-height)) + (cl-defmethod telephone-line-separator-width ((obj telephone-line-separator)) (or (oref obj forced-width) (ceiling (telephone-line-separator-height obj) 2))) +(cl-defmethod telephone-line-separator-width ((obj telephone-line-unicode-separator)) + (frame-char-width)) + (defclass telephone-line-subseparator (telephone-line-separator) ((pattern-func :initarg :pattern-func :initform #'telephone-line-row-pattern-hollow)))