From: Matt Birkholz <matt@birchwood-abbey.net>
Date: Mon, 6 Nov 2017 23:11:20 +0000 (-0700)
Subject: planetarium: Add subsystem identification.
X-Git-Tag: mit-scheme-pucked-9.2.12~24
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=721eb233b9b32fdd4ba27befaf1970d594bcbbc9;p=mit-scheme.git

planetarium: Add subsystem identification.
---

diff --git a/src/planetarium/NEWS b/src/planetarium/NEWS
index e069d114f..16de1bee6 100644
--- a/src/planetarium/NEWS
+++ b/src/planetarium/NEWS
@@ -19,6 +19,11 @@ You should have received a copy of the GNU General Public License
 along with this plugin; if not, write to the Free Software Foundation,
 Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA.
 
+mit-scheme-pucked-planetarium 0.2 - Matt Birkholz, 2017-11-06
+=============================================================
+
+Add subsystem identification.
+
 mit-scheme-pucked-planetarium 0.1 - Matt Birkholz, 2017-02-06
 =============================================================
 
diff --git a/src/planetarium/configure.ac b/src/planetarium/configure.ac
index bd1fc5aa4..0c73fcd83 100644
--- a/src/planetarium/configure.ac
+++ b/src/planetarium/configure.ac
@@ -1,7 +1,7 @@
 dnl Process this file with autoconf to produce a configure script.
 
 AC_INIT([MIT/GNU Scheme Pucked planetarium plugin],
-        [0.1],
+        [0.2],
         [matt@birchwood-abbey.net],
         [mit-scheme-pucked-planetarium])
 AC_CONFIG_SRCDIR([mit.pkg])
diff --git a/src/planetarium/debian/changelog b/src/planetarium/debian/changelog
index 9ee27d03a..0e12dd468 100644
--- a/src/planetarium/debian/changelog
+++ b/src/planetarium/debian/changelog
@@ -1,3 +1,9 @@
+mit-scheme-pucked-planetarium (0.2) birchwood; urgency=low
+
+  * Add subsystem identification.
+
+ -- Matt Birkholz <matt@birchwood-abbey.net>  Sun,  6 Nov 2017 16:00:00 -0700
+
 mit-scheme-pucked-planetarium (0.1) birchwood; urgency=low
 
   * Initial Debianization.
diff --git a/src/planetarium/mit-make.scm b/src/planetarium/mit-make.scm
index dfda20e95..89926e27f 100644
--- a/src/planetarium/mit-make.scm
+++ b/src/planetarium/mit-make.scm
@@ -27,11 +27,12 @@ Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA.
 ;;; when it is available.  (This presumes the 3D portion was
 ;;; installed.)
 
-(with-working-directory-pathname
-    (directory-pathname (current-load-pathname))
+(with-working-directory-pathname (directory-pathname (current-load-pathname))
   (lambda ()
     (parameterize ((param:suppress-loading-message? #t))
       (load-package-set "mit")
       (load "mit-link")
       (if (not (warn-errors? (lambda () (load-option 'GL))))
-	  (load-package-set "mit-3d")))))
\ No newline at end of file
+	  (load-package-set "mit-3d")))))
+
+(add-subsystem-identification! "Planetarium" '(0 2))
\ No newline at end of file