Push point onto tag ring

u-combinator · Dec 19, 2014 · 74b5a3c · 74b5a3c
1 parent fa6468e
commit 74b5a3c
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/haskell-commands.el b/haskell-commands.el
@@ -380,6 +380,7 @@ command from GHCi."
 (defun haskell-mode-goto-span (span)
   "Jump to the span, whatever file and line and column it needs
 to to get there."
+  (ring-insert find-tag-marker-ring (point-marker))
   (find-file (expand-file-name (plist-get span :path)
                                (haskell-session-cabal-dir (haskell-interactive-session))))
   (goto-char (point-min))