FileLoader replaces paste when Dropping files
[jalview.git] / src / jalview / gui / CutAndPasteTransfer.java
index d89d3be..2bb456b 100755 (executable)
@@ -88,6 +88,40 @@ public class CutAndPasteTransfer extends GCutAndPasteTransfer
       textarea.append(text);\r
     }\r
 \r
+\r
+    public void save_actionPerformed(ActionEvent e)\r
+    {\r
+      JalviewFileChooser chooser = new JalviewFileChooser(\r
+          jalview.bin.Cache.getProperty(\r
+              "LAST_DIRECTORY"));\r
+\r
+      chooser.setAcceptAllFileFilterUsed(false);\r
+      chooser.setFileView(new JalviewFileView());\r
+      chooser.setDialogTitle("Save Text to File");\r
+      chooser.setToolTipText("Save");\r
+\r
+      int value = chooser.showSaveDialog(this);\r
+\r
+      if (value == JalviewFileChooser.APPROVE_OPTION)\r
+      {\r
+        try\r
+        {\r
+          java.io.PrintWriter out = new java.io.PrintWriter(\r
+              new java.io.FileWriter(chooser.getSelectedFile()));\r
+\r
+          out.print(getText());\r
+          out.close();\r
+        }\r
+        catch (Exception ex)\r
+        {\r
+          ex.printStackTrace();\r
+        }\r
+\r
+      }\r
+    }\r
+\r
+\r
+\r
     /**\r
      * DOCUMENT ME!\r
      *\r
@@ -166,11 +200,6 @@ public class CutAndPasteTransfer extends GCutAndPasteTransfer
                                      AlignFrame.NEW_WINDOW_HEIGHT);\r
             af.statusBar.setText("Successfully pasted alignment file");\r
 \r
-            if(jalview.bin.Cache.getDefault("WRAP_ALIGNMENT", false))\r
-            {\r
-              af.wrapMenuItem.setSelected(true);\r
-              af.wrapMenuItem_actionPerformed(null);\r
-            }\r
             try\r
             {\r
               af.setMaximum(jalview.bin.Cache.getDefault("SHOW_FULLSCREEN", false));\r
@@ -178,15 +207,7 @@ public class CutAndPasteTransfer extends GCutAndPasteTransfer
             catch (Exception ex)\r
             {\r
             }\r
-\r
           }\r
-            try\r
-            {\r
-                this.setClosed(true);\r
-            }\r
-            catch (Exception ex)\r
-            {\r
-            }\r
         }\r
     }\r
 \r