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

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

[nongnu] elpa/telephone-line a7422d4b87 1/5: Fix some byte-compiler warn


From: ELPA Syncer
Subject: [nongnu] elpa/telephone-line a7422d4b87 1/5: Fix some byte-compiler warnings
Date: Sat, 8 Jan 2022 16:58:32 -0500 (EST)

branch: elpa/telephone-line
commit a7422d4b8738646b266433345e10c011fe5c94f0
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    Fix some byte-compiler warnings
---
 telephone-line-utils.el | 4 +++-
 telephone-line.el       | 2 ++
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/telephone-line-utils.el b/telephone-line-utils.el
index a84886814e..9d72bbd86b 100644
--- a/telephone-line-utils.el
+++ b/telephone-line-utils.el
@@ -276,7 +276,9 @@ Empty strings will not render."
 
 ;;;###autoload
 (defun telephone-line-raw (str &optional preformatted)
-  "Conditionally render STR as mode-line data, or just verify output if not 
PREFORMATTED.
+  "Conditionally render STR as mode-line data.
+If optional argument PREFORMATTED is non-nil, verify the output
+instead.
 Return nil for blank/empty strings."
   (let ((trimmed-str (string-trim (format-mode-line str))))
     (unless (seq-empty-p trimmed-str)
diff --git a/telephone-line.el b/telephone-line.el
index 825e4a425b..06b0318ab8 100644
--- a/telephone-line.el
+++ b/telephone-line.el
@@ -207,6 +207,7 @@ Secondary separators do not incur a background color 
change."
         (face-attribute (telephone-line-face-map sym) :foreground)
       (face-attribute (telephone-line-face-map subseparator-sym) 
:background))))
 
+(defvar ryo-modal-mode) ; silence byte-compiler
 (defun telephone-line-ryo-modal-face (active)
   "Return an appropriate face depending whether ryo-modal is activated, given 
whether frame is ACTIVE."
   (cond ((not active) 'mode-line-inactive)
@@ -214,6 +215,7 @@ Secondary separators do not incur a background color 
change."
         ((not ryo-modal-mode) 'telephone-line-evil-insert)
         (t 'telephone-line-evil-normal)))
 
+(defvar xah-fly-insert-state-q) ; silence byte-compiler
 (defun telephone-line-modal-face (active)
   "Return an appropriate face for the current mode, given whether the frame is 
ACTIVE."
   (cond ((not active) 'mode-line-inactive)



reply via email to

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