Commit Diff

Commit:
7a5ead659d51fa249e2af1fcbf0ad79e969e5204
From:
Omar Polo <op@omarpolo.com>
Date:
Message:
vc-got-repository-url: avoid infinite loops in parsing add a missing forward-line and make sure we don't try to go past the end of the file (another thing that may cause an infinite loop).
Actions:
Patch | Tree
commit - f8a9db5613417ffb30e54495f6a83c2f8a64dfe2
commit + 7a5ead659d51fa249e2af1fcbf0ad79e969e5204
blob - 8440bf5de445d95813d0ffbd4239b2158fbe0103
blob + f4121be3feb070ae066dc0f81880d080e4d30251
--- vc-got.el
+++ vc-got.el
@@ -665,9 +665,11 @@ Value is returned as floating point fractional number 
         (when (search-forward heading nil t)
           (forward-line)
           (while (and (not found)
-                      (looking-at ".*="))       ;too broad?
+                      (looking-at ".*=") ;too broad?
+                      (not (= (point) (point-max))))
             (when (looking-at ".*url = \\(.*\\)")
-              (setq found (match-string-no-properties 1))))
+              (setq found (match-string-no-properties 1)))
+            (forward-line))
           found)))))
 
 (provide 'vc-got)