# HG changeset patch
# User Oleksandr Gavenko <gavenkoa@gmail.com>
# Date 1488487304 -7200
# Node ID 636e49ed6d27487a55f0995058fc47be34970d68
# Parent  6401d60fd71ec9b5e97f54aba86845031cb75a3b
Prevent error if there is no repository. Fix highlighting of line numbers.

diff -r 6401d60fd71e -r 636e49ed6d27 ag.el
--- a/ag.el	Wed Mar 01 16:15:48 2017 +0200
+++ b/ag.el	Thu Mar 02 22:41:44 2017 +0200
@@ -41,7 +41,7 @@
   "Face for line number.")
 
 (defvar my/ag-keywords
-  '(("[1-9][0-9]\\{0,5\\}:" . (0 'my/ag-lineno-face))
+  '(("^[1-9][0-9]\\{0,5\\}:" . (0 'my/ag-lineno-face))
     ("^[^:]\\{6\\}.*" . (0 'my/ag-path-face))))
 
 (defun my/ag-font-lock-extend-region ()
@@ -87,15 +87,13 @@
      :command (list "ag" "--group" "--nocolor" regex))))
 
 (defun my/ag-project-root ()
-  (let ( (backend (vc-responsible-backend default-directory)) )
-    (if backend
-        (condition-case err
+  (condition-case err
+      (let ( backend )
+        (setq backend (vc-responsible-backend default-directory))
+        (if backend
             (vc-call-backend backend 'root default-directory)
-          (vc-not-supported
-           (unless (eq (cadr err) 'root)
-             (signal (car err) (cdr err)))
-           nil))
-      default-directory)))
+          default-directory))
+    (error default-directory)))
 
 ;;;###autoload
 (defun my/ag (regex)