Ignore:
Timestamp:
10/13/12 09:12:34 (8 years ago)
Author:
Mark Evenson
Message:

Cut the crap.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/contrib/mvn/jna.asd

    r14190 r14191  
    1515  (handler-case
    1616      (unless (jss:find-java-class "com.sun.jna.Native")
    17         (unless
    18             (flet ((match-jna-jar (p)
    19                      "Match `jna.jar`,`jna-3.0.9.jar`, or `jna-3.4.0.jar`."
    20                      (and (pathnamep p)
    21                           (equal (pathname-type p) "jar")
    22                           (java:jstatic "matches"
    23                                         "java.util.regex.Pattern"
    24                                         "jna(-[0-9]\\.[0-9]\\.[0-9](-.+)?)?"
    25                                         (pathname-name p))
    26                           p)))
    27               (dolist (loader (java:dump-classpath))
    28                 (let ((jna-jar (some #'match-jna-jar loader)))
    29                   (when jna-jar
    30                     (return abcl-jar)))))
    31           (unless
    32               (java:add-to-classpath (abcl-asdf:resolve
    33                                       "net.java.dev.jna:jna:3.4.0"))
    34             (java:add-to-classpath "http://repo1.maven.org/maven2/net/java/dev/jna/jna/3.4.0/jna-3.4.0.jar"))))
     17        (unless (java:add-to-classpath (abcl-asdf:resolve "net.java.dev.jna:jna:3.4.0"))
     18          (java:add-to-classpath "http://repo1.maven.org/maven2/net/java/dev/jna/jna/3.4.0/jna-3.4.0.jar")))
    3519    (t (e)
    3620      (error "Failed to resolve 'jna.jar' because~&~A." e))))
Note: See TracChangeset for help on using the changeset viewer.