# HG changeset patch
# User Oleksandr Gavenko <gavenkoa@gmail.com>
# Date 1490429901 -10800
# Node ID 59816a0cca92d3f6883678fd5596cde8b78ac05a
# Parent  fc1d9169d1345111f318b9a9a0ed0b7ef4a60ad7
Prefer look ahead. Fix typo.

diff -r fc1d9169d134 -r 59816a0cca92 maven.el
--- a/maven.el	Sat Mar 25 11:09:24 2017 +0300
+++ b/maven.el	Sat Mar 25 11:18:21 2017 +0300
@@ -28,19 +28,19 @@
 (defun maven.parse-pom-dependency (&optional point)
   (let (start end pos groupId artifactId version fs-o bs-o fs-c bs-c)
     (save-excursion
-      (goto-char point)
-      (unless (eq (char-after) ?<)
+      (if (looking-at "[^>]*<[^!]")
+          (progn (search-forward "<") (backward-char))
         (search-backward "<"))
       (setq point (point))
       (when (re-search-forward "<\\(?:plugin\\|dependency\\)>" nil t)
-        (setq fs-o (re-search-backward "<") nil t))
+        (setq fs-o (re-search-backward "<" nil t)))
       (goto-char point)
       (setq bs-o (re-search-backward "<\\(?:plugin\\|dependency\\)>" nil t))
       (goto-char point)
       (setq fs-c (re-search-forward "</\\(?:plugin\\|dependency\\)>" nil t))
       (goto-char point)
       (when (re-search-backward "</\\(?:plugin\\|dependency\\)>" nil t)
-        (setq bs-c (re-search-backward ">" nil t)))
+        (setq bs-c (re-search-forward ">" nil t)))
       (cond
        ((and fs-o (= fs-o point) fs-c)
         (maven.parse-pom-dependency-in-region fs-o fs-c))