# HG changeset patch
# User Adrian Buehlmann <adr...@cadifra.com>
# Date 1253482081 -7200
# Node ID 2e31643292abc49182effea6663b29e08693921b
# Parent  1cc0e05196b599811f3cf8eb6f460a020be9d286
thgmq: add "delete --keep" context menu command

diff --git a/tortoisehg/hgtk/thgmq.py b/tortoisehg/hgtk/thgmq.py
--- a/tortoisehg/hgtk/thgmq.py
+++ b/tortoisehg/hgtk/thgmq.py
@@ -301,7 +301,7 @@ class MQWidget(gtk.VBox):
             cmdline.append('--all')
         self.cmd.execute(cmdline, self.cmd_done)
 
-    def qdelete(self, patch):
+    def qdelete(self, patch, keep=False):
         """
         [MQ] Execute 'qdelete' command.
 
@@ -310,6 +310,8 @@ class MQWidget(gtk.VBox):
         if not self.has_patch():
             return
         cmdline = ['hg', 'qdelete', patch]
+        if keep:
+            cmdline.append('--keep')
         self.cmd.execute(cmdline, self.cmd_done, noemit=True)
 
     def qrename(self, name, patch='qtip'):
@@ -519,6 +521,7 @@ class MQWidget(gtk.VBox):
             append(_('_finish applied'), self.finish_activated)
         if not is_applied and not is_qparent:
             append(_('_delete'), self.delete_activated)
+            append(_('delete --keep'), self.delete_keep_activated)
             if has_applied and not is_qparent:
                 append(_('f_old'), self.fold_activated)
 
@@ -667,6 +670,9 @@ class MQWidget(gtk.VBox):
     def delete_activated(self, menuitem, row):
         self.qdelete(row[MQ_NAME])
 
+    def delete_keep_activated(self, menuitem, row):
+        self.qdelete(row[MQ_NAME], keep=True)
+    
     def rename_activated(self, menuitem, row):
         self.qrename_ui(row[MQ_NAME])
 

------------------------------------------------------------------------------
Come build with us! The BlackBerry&reg; Developer Conference in SF, CA
is the only developer event you need to attend this year. Jumpstart your
developing skills, take BlackBerry mobile applications to market and stay 
ahead of the curve. Join us from November 9&#45;12, 2009. Register now&#33;
http://p.sf.net/sfu/devconf
_______________________________________________
Tortoisehg-develop mailing list
Tortoisehg-develop@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/tortoisehg-develop

Reply via email to