From: Francois Fleuret <francois@fleuret.org>
Date: Mon, 3 Oct 2011 08:01:19 +0000 (+0200)
Subject: Cosmetics.
X-Git-Url: https://fleuret.org/cgi-bin/gitweb/gitweb.cgi?a=commitdiff_plain;h=213780fe104e763a5004e285b5c08883fe0ade49;p=elisp.git

Cosmetics.
---

diff --git a/alarm-vc.el b/alarm-vc.el
index 492a862..84fbf7f 100644
--- a/alarm-vc.el
+++ b/alarm-vc.el
@@ -65,25 +65,25 @@ should."
       (let ((id
              (concat
 
-              ;; CVS
+              ;; cvs
               (if (and (fboundp 'vc-cvs-registered)
                        (vc-cvs-responsible-p buffer-file-name)
                        (not (vc-cvs-registered buffer-file-name)))
-                  " CVS")
+                  " cvs")
 
               ;; Subversion
               (if (and (fboundp 'vc-svn-registered)
                        (vc-svn-responsible-p buffer-file-name)
                        (not (vc-svn-registered buffer-file-name)))
-                  " SVN")
+                  " svn")
 
-              ;; GIT
+              ;; git
               (if (and (fboundp 'vc-git-registered)
                        ;; does not exist in old emacs
                        (fboundp 'vc-git-responsible-p)
                        (vc-git-responsible-p buffer-file-name)
                        (not (vc-git-registered buffer-file-name)))
-                  " GIT")
+                  " git")
 
               )))