# HG changeset patch
# User Robert McIntyre <rlm@mit.edu>
# Date 1383688275 18000
# Node ID 02cc0734a976088ed261a33bea41db4f8ca501c5
# Parent  bbfdaa42c19af7a5158e6f0ac3499dc691f1f3a1
extra options.

diff -r bbfdaa42c19a -r 02cc0734a976 org/sense.org
--- a/org/sense.org	Mon Jul 15 00:15:48 2013 -0400
+++ b/org/sense.org	Tue Nov 05 16:51:15 2013 -0500
@@ -257,7 +257,7 @@
    Returns a function that accepts a BufferedImage and draws it to the
    JPanel. If given a directory it will save the images as png files
    starting at 0000000.png and incrementing from there."
-  ([#^File save]
+  ([#^File save title]
      (let [idx (atom -1)
            image
            (atom
@@ -268,7 +268,7 @@
                [graphics]
                (proxy-super paintComponent graphics)
                (.drawImage graphics @image 0 0 nil)))
-           frame (JFrame. "Display Image")]
+           frame (JFrame. title)]
        (SwingUtilities/invokeLater
         (fn []
           (doto frame
@@ -285,6 +285,8 @@
            (ImageIO/write
             i "png"
             (File. save (format "%07d.png" (swap! idx inc))))))))
+  ([#^File save]
+     (view-image save "Display Image"))
   ([] (view-image nil)))
 
 (defn view-sense