fix hog source checker

andrewpeck · Apr 12, 2024 · da58d25 · da58d25
1 parent 6d2184b
commit da58d25
Showing 1 changed file with 8 additions and 7 deletions.
diff --git a/hog.el b/hog.el
@@ -661,13 +661,14 @@ template at a specific PATH."
           (let* ((link (hog--get-link-at-point))
                  (link-is-glob (file-expand-wildcards link))
                  (link-exists (file-exists-p link)))
-
-            (when (or (not link)
-                      (string-empty-p link)
-                      (not link-exists)
-                      (not link-is-glob))
-              (setq errors (+ 1 errors))
-              (princ (format "Error:%d \"%s\" not found\n" (line-number-at-pos) link)))))
+            (when (not (string-empty-p link))
+              (print link)
+              (when (or (not link)
+
+                        (not link-exists)
+                        (not link-is-glob))
+                (setq errors (+ 1 errors))
+                (princ (format "Error:%d \"%s\" not found\n" (line-number-at-pos) link))))))
         (forward-line))) errors))
 
 (provide 'hog)