Prevent deleting WinForm to force going through response

issue2832
review568002

tryton/gui/window/win_form.py

@@ -42,6 +42,9 @@ class WinForm(NoModal):
         self.win.set_position(gtk.WIN_POS_CENTER_ON_PARENT)
         self.win.set_icon(TRYTON_ICON)
         self.win.set_has_separator(False)
+        if hasattr(self.win, 'set_deletable'):
+            self.win.set_deletable(False)
+        self.win.connect('close', self.close)
         self.win.connect('response', self.response)
 
         self.accel_group = gtk.AccelGroup()
@@ -388,6 +391,10 @@ class WinForm(NoModal):
         self.win.set_default_response(
             gtk.RESPONSE_OK if modified else gtk.RESPONSE_CANCEL)
 
+    def close(self, widget):
+        widget.emit_stop_by_name('close')
+        return True
+
     def response(self, win, response_id):
         validate = False
         cancel_responses = (gtk.RESPONSE_CANCEL, gtk.RESPONSE_DELETE_EVENT)