diff --git a/examples/cs019/where-am-i/where-am-i.rkt b/examples/cs019/where-am-i/where-am-i.rkt
index acfe7cc..6e3563d 100644
--- a/examples/cs019/where-am-i/where-am-i.rkt
+++ b/examples/cs019/where-am-i/where-am-i.rkt
@@ -19,23 +19,21 @@
 ;; one.
 (define-struct: world ([real : Coord/Unknown$]
                        [mock : Coord/Unknown$]))
-(define World$ (Sig: world?))
 
 
-
-(define: (location-change [world : World$] [dom : View$] [evt : Event$]) -> World$
+(define: (location-change [world : world$] [dom : View$] [evt : Event$]) -> world$
   (make-world (make-coord (event-ref evt "latitude")
                           (event-ref evt "longitude"))
               (world-mock world)))
 
 
-(define: (mock-location-change [world : World$] [dom : View$] [evt : Event$]) -> World$
+(define: (mock-location-change [world : world$] [dom : View$] [evt : Event$]) -> world$
   (make-world (world-real world)
               (make-coord (event-ref evt "latitude")
                           (event-ref evt "longitude"))))
 
 
-(define: (draw [world : World$] [dom : View$]) -> View$
+(define: (draw [world : world$] [dom : View$]) -> View$
   (local [(define v1 (if (coord? (world-real world))
                          (update-view-text (view-focus dom "real-location")
                                            (format "lat=~a, lng=~a"
diff --git a/make-planet-archive.sh b/make-planet-archive.sh
new file mode 100755
index 0000000..f8e3085
--- /dev/null
+++ b/make-planet-archive.sh
@@ -0,0 +1,28 @@
+#!/bin/bash
+MAJOR=1
+MINOR=4
+PROJNAME=whalesong
+
+
+OLDDIR=`pwd`
+mkdir -p tmp
+rm -rf tmp/$PROJNAME
+echo "Checking out clean repo"
+git archive --format=tar --prefix=$PROJNAME/ HEAD | (cd tmp && tar xf -)
+
+## Remove any directories that we don't want as part of the repository.
+#cd $OLDDIR/tmp/$PROJNAME/private
+#rm -rf sandbox
+
+
+cd $OLDDIR/tmp
+
+raco planet unlink dyoo $PROJNAME.plt $MAJOR $MINOR
+raco planet link dyoo $PROJNAME.plt $MAJOR $MINOR $PROJNAME
+echo "Making planet package"
+raco planet create $PROJNAME
+
+raco planet unlink dyoo $PROJNAME.plt $MAJOR $MINOR
+
+cd $OLDDIR
+cp tmp/$PROJNAME.plt .
\ No newline at end of file
diff --git a/scribblings/manual.scrbl b/scribblings/manual.scrbl
index 7a8075f..fa07d10 100644
--- a/scribblings/manual.scrbl
+++ b/scribblings/manual.scrbl
@@ -1266,7 +1266,7 @@ Whalesong uses code and utilities from the following external projects:
 @item{js-numbers (@url{http://github.com/dyoo/js-numbers/})}
 @item{JSON (@url{http://www.json.org/js.html})}
 @item{jquery (@url{http://jquery.com/})}
-@item{Google Closure Compiler (@url{http://code.google.com/p/closure-compiler/}}}
+@item{Google Closure Compiler (@url{http://code.google.com/p/closure-compiler/})}
 
 
 @item{excanvas (@url{http://excanvas.sourceforge.net/})}