@@ -24,6 +24,7 @@
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (gnu packages geo)
+ #:use-module (guix build-system ant)
#:use-module (guix build-system cmake)
#:use-module (guix build-system glib-or-gtk)
#:use-module (guix build-system gnu)
@@ -851,3 +852,38 @@ map, geocoding with Nominatim, or general analysis.")
the texture and density of features is visible at every zoom level, instead of
dropping features at lower levels.")
(license license:bsd-2)))
+
+(define-public java-jmapviewer
+ (package
+ (name "java-jmapviewer")
+ (version "2.9")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append "https://svn.openstreetmap.org/applications/"
+ "viewer/jmapviewer/releases/" version
+ "/JMapViewer-" version "-Source.zip"))
+ (sha256
+ (base32
+ "06jilhvsx662raix58g8ccl56d1pmirwlys9px0mdg7j46wixk6l"))))
+ (build-system ant-build-system)
+ (native-inputs
+ `(("unzip" ,unzip)))
+ (arguments
+ `(#:build-target "pack"
+ #:tests? #f; No tests
+ #:phases
+ (modify-phases %standard-phases
+ (add-before 'build 'clean
+ (lambda* _
+ (invoke "ant" "clean")))
+ (replace 'install
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let ((dir (string-append (assoc-ref outputs "out") "/share/java/")))
+ (mkdir-p dir)
+ (copy-file "JMapViewer.jar" (string-append dir "JMapViewer.jar"))))))))
+ (home-page "https://wiki.openstreetmap.org/wiki/JMapViewer")
+ (synopsis "OSM map integration in Java")
+ (description "JMapViewer is a Java component which allows to easily
+integrate an OSM map view into your Java application. It is maintained as
+an independent project by the JOSM team.")
+ (license license:gpl2)))