emacs-diffs
[Top][All Lists]
Advanced

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

master 065f6a1: ; Fix warning in last change


From: Tino Calancha
Subject: master 065f6a1: ; Fix warning in last change
Date: Thu, 14 May 2020 16:07:21 -0400 (EDT)

branch: master
commit 065f6a1d8b5c7dc8f1bf758e22f2e9a7d17b47d4
Author: Tino Calancha <address@hidden>
Commit: Tino Calancha <address@hidden>

    ; Fix warning in last change
    
    * lisp/arc-mode.el (archive--summarize-descs):
    Use file-modes-number-to-symbolic.
---
 lisp/arc-mode.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/arc-mode.el b/lisp/arc-mode.el
index 6ce64fe..6781c29 100644
--- a/lisp/arc-mode.el
+++ b/lisp/arc-mode.el
@@ -1506,7 +1506,7 @@ This doesn't recover lost files, it just undoes changes 
in the buffer itself."
            (timelen (length (archive--file-desc-time sample)))
            (samplemode (and (archive--enabled-p 'Mode)
                             (archive--file-desc-mode sample)))
-           (modelen (length (if samplemode (archive-int-to-mode samplemode)))))
+           (modelen (length (if samplemode (file-modes-number-to-symbolic 
samplemode)))))
       (dolist (desc descs)
         (when ids
           (let* ((uid (archive--file-desc-uid desc))
@@ -1553,7 +1553,7 @@ This doesn't recover lost files, it just undoes changes 
in the buffer itself."
                           (text
                            (concat "  "
                                    (when (> modelen 0)
-                                     (concat (archive-int-to-mode
+                                     (concat (file-modes-number-to-symbolic
                                               (archive--file-desc-mode desc))
                                              "  "))
                                    (when ids



reply via email to

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