# HG changeset patch
# User Brendan Cully <brendan@kublai.com>
# Date 1173894318 25200
# Node ID 6cb5be6bd70f89a801ecdec3f3c12aabc64a2a13
# Parent  dbc3846c09a1d24c66acce3b5ab6d2d36b0160ea
mq: add qparent tag (first parent of qbase)

diff -r dbc3846c09a1 -r 6cb5be6bd70f hgext/mq.py
--- a/hgext/mq.py	Wed Mar 14 01:26:09 2007 -0500
+++ b/hgext/mq.py	Wed Mar 14 10:45:18 2007 -0700
@@ -2085,14 +2085,15 @@
             if not q.applied:
                 return tagscache
 
-            mqtags = [(patch.rev, patch.name) for patch in q.applied]
+            mqtags = [(revlog.bin(patch.rev), patch.name) for patch in q.applied]
             mqtags.append((mqtags[-1][0], 'qtip'))
             mqtags.append((mqtags[0][0], 'qbase'))
+            mqtags.append((self.changelog.parents(mqtags[0][0])[0], 'qparent'))
             for patch in mqtags:
                 if patch[1] in tagscache:
                     self.ui.warn('Tag %s overrides mq patch of the same name\n' % patch[1])
                 else:
-                    tagscache[patch[1]] = revlog.bin(patch[0])
+                    tagscache[patch[1]] = patch[0]
 
             return tagscache
 
diff -r dbc3846c09a1 -r 6cb5be6bd70f tests/test-mq
--- a/tests/test-mq	Wed Mar 14 01:26:09 2007 -0500
+++ b/tests/test-mq	Wed Mar 14 10:45:18 2007 -0700
@@ -262,6 +262,9 @@
 hg qpush -a
 hg st
 
+echo % mq tags
+hg log --template '{rev} {tags}\n' -r qparent:qtip
+
 cat >>$HGRCPATH <<EOF
 [diff]
 git = True
diff -r dbc3846c09a1 -r 6cb5be6bd70f tests/test-mq.out
--- a/tests/test-mq.out	Wed Mar 14 01:26:09 2007 -0500
+++ b/tests/test-mq.out	Wed Mar 14 10:45:18 2007 -0700
@@ -265,6 +265,10 @@
 Errors during apply, please fix and refresh bar
 ? foo
 ? foo.rej
+% mq tags
+0 qparent
+1 qbase foo
+2 qtip bar tip
 new file
 
 diff --git a/new b/new