From 72f41620c8c674fe1232f07bedd91bf0d7874ea2 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Thu, 25 Jun 2020 22:36:15 +0200
Subject: Fix GEO output.

---
 module/vcomponent/geo.scm | 11 +++++++++++
 1 file changed, 11 insertions(+)
 create mode 100644 module/vcomponent/geo.scm

(limited to 'module/vcomponent/geo.scm')

diff --git a/module/vcomponent/geo.scm b/module/vcomponent/geo.scm
new file mode 100644
index 00000000..2a343ed9
--- /dev/null
+++ b/module/vcomponent/geo.scm
@@ -0,0 +1,11 @@
+(define-module (vcomponent geo)
+  :use-module (util)
+  :use-module (srfi srfi-9 gnu))
+
+(define-immutable-record-type <geographical-position>
+  (make-geo latitude longitude)
+  geo-pos?
+  (latitude geo-latitude)
+  (longitude geo-longitude))
+
+(export make-geo geo-pos? geo-latitude geo-longitude)
-- 
cgit v1.2.3