[nongnu] elpa/git-commit d5ed87b138 1/9: magit-margin-default-time-format: New un-advertised variable

[ELPA Syncer]

branch: elpa/git-commit
commit d5ed87b1382522c3e875fc7ae40e19135e3cc0aa
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    magit-margin-default-time-format: New un-advertised variable
    
    Closes #4605.
---
 lisp/magit-margin.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/lisp/magit-margin.el b/lisp/magit-margin.el
index 4cd8074f51..5f6375a64b 100644
--- a/lisp/magit-margin.el
+++ b/lisp/magit-margin.el
@@ -77,6 +77,9 @@ does not carry to other options."
   (setcar magit-buffer-margin (not (magit-buffer-margin-p)))
   (magit-set-buffer-margin))
 
+(defvar magit-margin-default-time-format nil
+  "See https://github.com/magit/magit/pull/4605.";)
+
 (defun magit-cycle-margin-style ()
   "Cycle style used for the Magit margin."
   (interactive)
@@ -87,7 +90,8 @@ does not carry to other options."
         (pcase (cadr magit-buffer-margin)
           (`age 'age-abbreviated)
           (`age-abbreviated
-           (let ((default (cadr (symbol-value (magit-margin-option)))))
+           (let ((default (or magit-margin-default-time-format
+                              (cadr (symbol-value (magit-margin-option))))))
              (if (stringp default) default "%Y-%m-%d %H:%M ")))
           (_ 'age)))
   (magit-set-buffer-margin nil t))