planetarium/mit-snapshot: Remove redundant draw-tellurion call(!).
authorMatt Birkholz <matt@birkholz.chandler.az.us>
Mon, 4 Nov 2013 00:21:28 +0000 (17:21 -0700)
committerMatt Birkholz <matt@birkholz.chandler.az.us>
Mon, 4 Nov 2013 00:21:28 +0000 (17:21 -0700)
src/planetarium/mit-snapshot.scm

index d066dff3043fa7c5f2ea3567341d16d0541d0547..a2709f8067e93bd7826e6a5ccc5ff4eb7ae4be4b 100644 (file)
@@ -77,8 +77,6 @@ USA.
          (write-string (universal-time->local-time-string time) out)
          (newline out)))))
 
-  (draw-tellurion device time (make-latitude/longitude latitude longitude))
-
   (let ((surface (surface-ink-surface (graphics-device/descriptor device))))
     (cairo-surface-write-to-png surface "tellurion.png")
     (cairo-surface-destroy surface)))
\ No newline at end of file