# HG changeset patch
# User Alexis S. L. Carvalho <alexis@cecm.usp.br>
# Date 2007-03-11 01:03:21
# Node ID 1df1baf2002ebae26ffb2037cb4e4948fdaf8947
# Parent  7b5723c95a822624f1c25f3ad6149f2a5f4b890a

fix qclone to a remote repo

This fixes issue467.  -stable still needs something like revision
55578a8d7e84 - mq: allow push if -r is given explicitly.

In the meantime, hg qpop -a; hg qclone . ssh://...  is a workaround.

diff --git a/hgext/mq.py b/hgext/mq.py
--- a/hgext/mq.py
+++ b/hgext/mq.py
@@ -1504,7 +1504,11 @@ def clone(ui, source, dest=None, **opts)
         if sr.mq.applied:
             qbase = revlog.bin(sr.mq.applied[0].rev)
             if not hg.islocal(dest):
-                destrev = sr.parents(qbase)[0]
+                heads = dict.fromkeys(sr.heads())
+                for h in sr.heads(qbase):
+                    del heads[h]
+                destrev = heads.keys()
+                destrev.append(sr.changelog.parents(qbase)[0])
     ui.note(_('cloning main repo\n'))
     sr, dr = hg.clone(ui, sr, dest,
                       pull=opts['pull'],