[nongnu] elpa/vc-fossil 0da61d3 025/111: standard comment style

[ELPA Syncer]

branch: elpa/vc-fossil
commit 0da61d3538fa642359672bb8e937d208e742c428
Author: barak <barak>
Commit: barak <barak>

    standard comment style
---
 vc/el/vc-fossil.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/vc/el/vc-fossil.el b/vc/el/vc-fossil.el
index 3304de0..5928657 100644
--- a/vc/el/vc-fossil.el
+++ b/vc/el/vc-fossil.el
@@ -103,11 +103,11 @@
        ((string= code "MERGE")     'needs-merge)
        (t                          nil)))
 
-; (vc-fossil-state "/proj/fiesta/tools/fossil/emacs-fossil/vc/el/vc-fossil.el")
+;; (vc-fossil-state 
"/proj/fiesta/tools/fossil/emacs-fossil/vc/el/vc-fossil.el")
 
 (defun vc-fossil-state  (file)
   "Fossil specific version of `vc-state'."
-  ; (message (format "vc-fossil-state on %s" file))
+  ;; (message (format "vc-fossil-state on %s" file))
   (let ((line (vc-fossil--run "update" "-n" "-v" "current" file)))
     (and line
         (vc-fossil-state-code (car (split-string line))))))
@@ -127,7 +127,7 @@
 
 (defun vc-fossil-dir-status (dir update-function)
   "Get Fossil status for all files in a directory"
-  ;(message dir)
+  ;; (message dir)
   (insert (vc-fossil--run "update" "-n" "-v" "current" dir))
   (let* ((result)
         (done nil)
@@ -266,11 +266,11 @@
             (newver nil)
             line version)
        (insert (vc-fossil--run "finfo" "-l" "-b" file))
-                                       ;(vc-fossil--call "fossil" "finfo" "-l" 
"-b" file)
+       ;; (vc-fossil--call "fossil" "finfo" "-l" "-b" file)
        (goto-char (point-min))
        (while (not (eobp))
          (setq line (buffer-substring-no-properties (point) 
(line-end-position)))
-                                       ;(message line)
+         ;; (message line)
          (setq version (car (split-string line)))
          (setq newver (or newver (and found version)))
          (setq found  (string= version rev))
@@ -285,7 +285,7 @@
             (oldver nil)
             line version)
        (insert (vc-fossil--run "finfo" "-l" "-b" file))
-                                       ;(vc-fossil--call "fossil" "finfo" "-l" 
"-b" file)
+       ;; (vc-fossil--call "fossil" "finfo" "-l" "-b" file)
        (goto-char (point-min))
        (while (not (eobp))
          (setq line (buffer-substring-no-properties (point) 
(line-end-position)))