Add option for OC snapshot

Author: corpnewt

ProperTree.command

@@ -93,6 +93,8 @@ class ProperTree:
         file_menu.add_command(label="Save As ({}Shift+S)".format(sign), command=self.save_plist_as)
         file_menu.add_command(label="Duplicate ({}D)".format(sign), command=self.duplicate_plist)
         file_menu.add_separator()
+        file_menu.add_command(label="OC Snapshot ({}R)".format(sign), command=self.oc_snapshot)
+        file_menu.add_separator()
         file_menu.add_command(label="Convert Window ({}T)".format(sign), command=self.show_convert)
         file_menu.add_command(label="Strip Comments ({}M)".format(sign), command=self.strip_comments)
         file_menu.add_separator()
@@ -115,6 +117,7 @@ class ProperTree:
         self.tk.bind_all("<{}-z>".format(key), self.undo)
         self.tk.bind_all("<{}-Z>".format(key), self.redo)
         self.tk.bind_all("<{}-m>".format(key), self.strip_comments)
+        self.tk.bind_all("<{}-r>".format(key), self.oc_snapshot)
         if not str(sys.platform) == "darwin":
             # Rewrite the default Command-Q command
             self.tk.bind_all("<{}-q>".format(key), self.quit)
@@ -135,6 +138,16 @@ class ProperTree:
             return
         window.change_data_display(new_data)
 
+    def oc_snapshot(self, event = None):
+        windows = self.stackorder(self.tk)
+        if not len(windows):
+            # Nothing to save
+            return
+        window = windows[-1] # Get the last item (most recent)
+        if window == self.tk:
+            return
+        window.oc_snapshot(event)
+
     def close_window(self, event = None, check_close = True):
         # Remove the default window that comes from it
         if str(sys.platform) == "darwin":
@@ -361,4 +374,4 @@ class ProperTree:
         self.tk.destroy()
 
 if __name__ == '__main__':
-    p = ProperTree()
+    p = ProperTree()