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

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

[elpa] externals/activities 597bccdbd9 17/50: annotate: indicate active


From: ELPA Syncer
Subject: [elpa] externals/activities 597bccdbd9 17/50: annotate: indicate active and modified using final flag char
Date: Wed, 25 Dec 2024 03:57:18 -0500 (EST)

branch: externals/activities
commit 597bccdbd9ece7acd4ee5b41b961fb446f6805fd
Author: J.D. Smith <jdtsmith@gmail.com>
Commit: JD Smith <93749+jdtsmith@users.noreply.github.com>

    annotate: indicate active and modified using final flag char
---
 activities.el | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/activities.el b/activities.el
index e464f83041..9701e19573 100644
--- a/activities.el
+++ b/activities.el
@@ -901,6 +901,11 @@ OLDEST-POSSIBLE is the oldest age in the 
`vc-annotate-color-map'."
                                        (format "%15s" (apply #'format "[%d %s]"
                                                              (activities--age 
age)))
                                        'face `(:foreground ,age-color
+                                                           :background 
,vc-annotate-background)))
+                      (dirty-char (cond ((and activep dirtyp) "*")
+                                        (activep "+") (dirtyp "-") (t " ")))
+                      (dirty-annotation (propertize dirty-char 'face 'bold)))
+           (concat (propertize " " 'display
                                `(space :align-to (- right ,(+ 1 (length 
annotation)
                                                               (length 
age-annotation)))))
                    annotation age-annotation dirty-annotation)))))))



reply via email to

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