emacs-framebuffer

Emacs library to show images and documents in console using Linux framebuffer
Log | Files | Refs
commit c6b4cb0991bcf39064c1ca3ea58207d2e35884fd
parent d69468ea0c2ef1a7730254a1f4c9515e7999c6b2
Author: Tomas Hlavaty <tom@logand.com>
Date:   Sat, 17 Oct 2020 21:19:13 +0200

more robust mode-line

Diffstat:

Memacs-framebuffer.el | 7++-----


1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/emacs-framebuffer.el b/emacs-framebuffer.el
@@ -543,12 +543,9 @@
   (setq framebuffer-image-mode-scroll 0)
   (setq-local mode-line-position
               '(" P"
-                (:eval (number-to-string framebuffer-image-mode-current-page))
+                (:eval (prin1-to-string framebuffer-image-mode-current-page))
                 "/"
-                (:eval (typecase framebuffer-image-mode-npages
-                         (number
-                          (number-to-string framebuffer-image-mode-npages))
-                         (t "?")))))
+                (:eval (prin1-to-string framebuffer-image-mode-npages))))
   (with-silent-modifications
     (erase-buffer)
     (insert "file: ")