[nongnu] elpa/slime 88d39e2: abcl: fix edit location finding in jar files

[ELPA Syncer]

branch: elpa/slime
commit 88d39e241bf6f6a2a1daced6d93c8e35692e8889
Author: Mark Evenson <evenson@hawk.local>
Commit: Mark Evenson <evenson.not.org@gmail.com>

    abcl: fix edit location finding in jar files
    
    (Alan Ruttenberg)
    
    Originally
    
<https://github.com/alanruttenberg/slime/commit/1d17cbcafb4c4c2675c037c12f036b1a90e76bc7>.
    
    Addresses <https://github.com/armedbear/abcl/issues/411>.
---
 swank/abcl.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/swank/abcl.lisp b/swank/abcl.lisp
index 7145b66..6be00de 100644
--- a/swank/abcl.lisp
+++ b/swank/abcl.lisp
@@ -1005,7 +1005,7 @@
       (when (atom what)
         (setq what (list what sym)))
       (list (definition-specifier what)
-            (if (ext:pathname-jar-p path2)
+            (if (ext:pathname-jar-p (pathname path2))
                 `(:location
                   (:zip ,@(split-string (subseq path2 (length "jar:file:")) 
"!/"))
                   ;; pos never seems right. Use function name.