mq/qqueue: split _setactive

Prepare _setactive to be called without checking for applied patches.

hgext/mq.py

@@ -2662,7 +2662,9 b' def qqueue(ui, repo, name=None, **opts):'
     def _setactive(name):
         if q.applied:
             raise util.Abort(_('patches applied - cannot set new queue active'))
-
+        _setactivenocheck(name)
+
+    def _setactivenocheck(name):
         fh = repo.opener(_activequeue, 'w')
         if name != 'patches':
             fh.write(name)