emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/telephone-line c17c71ae18 132/195: Add missing methods to


From: ELPA Syncer
Subject: [nongnu] elpa/telephone-line c17c71ae18 132/195: Add missing methods to telephone-line-unicode-separator
Date: Wed, 5 Jan 2022 02:59:39 -0500 (EST)

branch: elpa/telephone-line
commit c17c71ae18ad54b8c3d1eddbe78ed82816d06186
Author: Daniel Bordak <dbordak@fastmail.fm>
Commit: Daniel Bordak <dbordak@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)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]