Add comment

emacs.el

@@ -1,6 +1,6 @@
 ;;; emacs.el --- 10sr emacs initialization
 
-;; Time-stamp: <2018-10-18 16:53:25 JST 10sr>
+;; Time-stamp: <2018-10-18 17:01:09 JST 10sr>
 
 ;;; Code:
 
@@ -1692,8 +1692,8 @@ and search from projectile root (if projectile is available)."
            (safe-require-or-eval 'projectile)
            (projectile-project-p))
       (projectile-with-default-dir (projectile-project-root)
-                                   (compilation-start command-args
-                                                      'grep-mode))
+        (compilation-start command-args
+                           'grep-mode))
     (compilation-start command-args
                        'grep-mode)))
 
@@ -1711,8 +1711,8 @@ and search from projectile root (if projectile is available)."
     (if (safe-require-or-eval 'projectile)
         (projectile-with-default-dir (or (projectile-project-root)
                                          default-directory)
-                                     (compilation-start command-args
-                                                        'grep-mode))
+          (compilation-start command-args
+                             'grep-mode))
       (compilation-start command-args
                          'grep-mode))))
 
@@ -2336,7 +2336,7 @@ TYPE is target object type."
         (erase-buffer)
         (insert-buffer-substring buf)))))
 
-  (require 'ansi-color)
+(require 'ansi-color)
 (defun git-walktree--open-treeish (commitish path treeish)
   "Open git tree buffer of TREEISH."
   (cl-assert path)
@@ -2386,6 +2386,7 @@ TYPE is target object type."
                                           "--abbrev"
 
                                           treeish)
+              ;; TODO: Somehow text properties are stripped here
               (git-walktree--replace-into buf))))
         (git-walktree-mode)
         (set-buffer-modified-p nil)