Don't discard version number in ghc-resolve-package

and match last (i.e. newest) rather than first listed package.
2010-10-27 20:55:31 +02:00 · 2010-10-27 20:55:31 +02:00 · 562441deb6
commit 562441deb6
parent 14014e1a5e
1 changed files with 3 additions and 3 deletions
--- a/elisp/ghc-doc.el
+++ b/elisp/ghc-doc.el
@ -22,8 +22,8 @@
  (with-temp-buffer
    (call-process "ghc-pkg" nil t nil "find-module" "--simple-output" mod)
    (goto-char (point-min))
-    (when (looking-at "^\\([^ ]+\\)-[0-9]")
-      (match-string-no-properties 1))))
+    (when (re-search-forward "[^ ]+-[0-9]*\\(\\.[0-9]*\\)*$")
+      (match-string-no-properties 0))))

 (defun ghc-resolve-document-path (pkg)
  (with-temp-buffer