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

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

[nongnu] elpa/hyperdrive 9e8cf738ba 26/30: Tidy


From: ELPA Syncer
Subject: [nongnu] elpa/hyperdrive 9e8cf738ba 26/30: Tidy
Date: Wed, 6 Sep 2023 18:59:44 -0400 (EDT)

branch: elpa/hyperdrive
commit 9e8cf738ba9564dbeb649f5ee362e49f72993822
Author: Adam Porter <adam@alphapapa.net>
Commit: Adam Porter <adam@alphapapa.net>

    Tidy
---
 hyperdrive-dir.el     | 4 +---
 hyperdrive-history.el | 4 +---
 hyperdrive-vars.el    | 6 +++---
 3 files changed, 5 insertions(+), 9 deletions(-)

diff --git a/hyperdrive-dir.el b/hyperdrive-dir.el
index f41f3e33e2..67efe54c2c 100644
--- a/hyperdrive-dir.el
+++ b/hyperdrive-dir.el
@@ -200,9 +200,7 @@ To be used as the pretty-printer for `ewoc-create'."
                        'default))
                (timestamp (if mtime
                               (format-time-string hyperdrive-timestamp-format 
mtime)
-                            (propertize " "
-                                        'display
-                                        '(space :width 
hyperdrive-timestamp-width)))))
+                            (propertize " " 'display '(space :width 
hyperdrive-timestamp-width)))))
     (format "%6s  %s  %s"
             (propertize (or size "")
                         'face 'hyperdrive-size)
diff --git a/hyperdrive-history.el b/hyperdrive-history.el
index 74a08a5e2a..f814710664 100644
--- a/hyperdrive-history.el
+++ b/hyperdrive-history.el
@@ -60,9 +60,7 @@ and whose cdr is a hyperdrive entry."
                        (file-size-human-readable size)))
                (timestamp (if mtime
                               (format-time-string hyperdrive-timestamp-format 
mtime)
-                            (propertize " "
-                                        'display
-                                        '(space :width 
hyperdrive-timestamp-width)))))
+                            (propertize " " 'display '(space :width 
hyperdrive-timestamp-width)))))
     ;; FIXME: Use dynamic width of range column equal to 2N+1, where N
     ;; is the width of the hyperdrive's latest version
     (format "%7s  %13s  %6s  %s"
diff --git a/hyperdrive-vars.el b/hyperdrive-vars.el
index 4007df5c4c..cd945c98d6 100644
--- a/hyperdrive-vars.el
+++ b/hyperdrive-vars.el
@@ -95,7 +95,7 @@ Passed to `display-buffer', which see."
 
 (defcustom hyperdrive-directory-sort '(name . :ascending)
   "Column by which directory entries are sorted.
-Internally, a cons cell of (COLUMN . DIRECTION), the COLUMn being
+Internally, a cons cell of (COLUMN . DIRECTION), the COLUMN being
 one of the directory listing columns (\\+`name', \\+`size', or
 \\+`mtime') and DIRECTION being one of \\+`:ascending' or
 \\+`:descending'."
@@ -191,8 +191,8 @@ an existing buffer at the same version, or make a new 
buffer."
 (defface hyperdrive-column-header '((t (:inherit underline)))
   "Column header.")
 
-(defface hyperdrive-selected-column-header '((t (:inherit underline
-                                                          :weight bold)))
+(defface hyperdrive-selected-column-header '((t ( :inherit underline
+                                                  :weight bold)))
   "Selected column header.")
 
 (defface hyperdrive-directory '((t (:inherit dired-directory)))



reply via email to

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