← Back to branch summary

~ubuntu-branches/ubuntu/precise/mercurial/precise-updates

« back to all changes in this revision

Viewing changes to debian/patches/backport_hgk_ext.patch

  • Committer: Bazaar Package Importer
  • Author(s): Vincent Danjean
  • Date: 2005-09-23 11:45:13 UTC
  • Revision ID: james.westby@ubuntu.com-20050923114513-819v977ptuvi8c0e
Tags: 0.7-4
* backport from upstream of
  - use of 'hgext' directory for extensions
  - 'hgk.py' extension (was hgit before)
  => 'hg view' works ;-)
* add 'Recommands: wish' for the hgk extension

Show diffs side-by-side

added added

removed removed

Lines of Context:
debian/patches/backport_hgk_ext.patch
 
1
Index: mercurial-0.7/contrib/hgit
 
2
===================================================================
 
3
--- mercurial-0.7.orig/contrib/hgit     2005-09-23 10:34:30.000000000 +0200
 
4
+++ mercurial-0.7/contrib/hgit  2005-09-23 10:42:15.000000000 +0200
 
5
@@ -7,7 +7,7 @@
 
6
 # This software may be used and distributed according to the terms
 
7
 # of the GNU General Public License, incorporated herein by reference.
 
8
 
 
9
-import time, sys, signal
 
10
+import time, sys, signal, os
 
11
 from mercurial import hg, mdiff, fancyopts, commands, ui, util
 
12
 
 
13
 def dodiff(fp, ui, repo, node1, node2, files=None, match=util.always,
 
14
@@ -86,7 +86,7 @@
 
15
 
 
16
         for f in c:
 
17
             # TODO get file permissions
 
18
-            print ":100664 100664 %s %s M\t%s\t%s" % (hg.hex(mmap[f]), 
 
19
+            print ":100664 100664 %s %s M\t%s\t%s" % (hg.hex(mmap[f]),
 
20
                                                       hg.hex(mmap2[f]), f, f)
 
21
         for f in a:
 
22
             print ":000000 100664 %s %s N\t%s\t%s" % (empty, hg.hex(mmap2[f]), f, f)
 
23
@@ -137,7 +137,7 @@
 
24
         committer = lines[-1].split(': ')[1].rstrip()
 
25
     else:
 
26
         committer = "%s %s %s" % (changes[1], date, date_ar[1])
 
27
-        
 
28
+
 
29
     print "author %s %s %s" % (changes[1], date, date_ar[1])
 
30
     print "committer %s" % (committer)
 
31
     print ""
 
32
@@ -220,7 +220,7 @@
 
33
                     yield (i + x, full != None and l[x] or None)
 
34
             if i == 0:
 
35
                 break
 
36
-            
 
37
+
 
38
     # calculate and return the reachability bitmask for sha
 
39
     def is_reachable(ar, reachable, sha):
 
40
         if len(ar) == 0:
 
41
@@ -313,22 +313,28 @@
 
42
     copy = [x for x in revs]
 
43
     revtree(copy, repo, full, opts['max_count'], opts['parents'])
 
44
 
 
45
+def view(ui, repo, *etc):
 
46
+    "start interactive history viewer"
 
47
+    os.chdir(repo.root)
 
48
+    os.system("hgk " + " ".join(etc))
 
49
+
 
50
 cmdtable = {
 
51
-    "git-diff-tree": (difftree, [('p', 'patch', None, 'generate patch'),
 
52
+    "view": (view, [], 'hg view'),
 
53
+    "debug-diff-tree": (difftree, [('p', 'patch', None, 'generate patch'),
 
54
                             ('r', 'recursive', None, 'recursive'),
 
55
                             ('P', 'pretty', None, 'pretty'),
 
56
                             ('s', 'stdin', None, 'stdin'),
 
57
                             ('C', 'copy', None, 'detect copies'),
 
58
                             ('S', 'search', "", 'search')],
 
59
                             "hg git-diff-tree [options] node1 node2"),
 
60
-    "git-cat-file": (catfile, [('s', 'stdin', None, 'stdin')],
 
61
-                 "hg cat-file [options] type file"),
 
62
-    "git-merge-base": (base, [], "hg git-merge-base node node"),
 
63
-    "git-rev-list": (revlist, [('H', 'header', None, 'header'),
 
64
+    "debug-cat-file": (catfile, [('s', 'stdin', None, 'stdin')],
 
65
+                 "hg debug-cat-file [options] type file"),
 
66
+    "debug-merge-base": (base, [], "hg debug-merge-base node node"),
 
67
+    "debug-rev-list": (revlist, [('H', 'header', None, 'header'),
 
68
                            ('t', 'topo-order', None, 'topo-order'),
 
69
                            ('p', 'parents', None, 'parents'),
 
70
                            ('n', 'max-count', 0, 'max-count')],
 
71
-                 "hg git-rev-list [options] revs"),
 
72
+                 "hg debug-rev-list [options] revs"),
 
73
 }
 
74
 
 
75
 def reposetup(ui, repo):
 
76
Index: mercurial-0.7/contrib/hgk
 
77
===================================================================
 
78
--- mercurial-0.7.orig/contrib/hgk      2005-09-16 23:02:33.000000000 +0200
 
79
+++ mercurial-0.7/contrib/hgk   2005-09-23 10:41:53.000000000 +0200
 
80
@@ -34,7 +34,7 @@
 
81
     set ncmupdate 1
 
82
     if [catch {
 
83
        set parse_args [concat --default HEAD $rargs]
 
84
-       set parsed_args [split [eval exec hg git-rev-parse $parse_args] "\n"]
 
85
+       set parsed_args [split [eval exec hg debug-rev-parse $parse_args] "\n"]
 
86
     }] {
 
87
        # if git-rev-parse failed for some reason...
 
88
        if {$rargs == {}} {
 
89
@@ -43,9 +43,9 @@
 
90
        set parsed_args $rargs
 
91
     }
 
92
     if [catch {
 
93
-       set commfd [open "|hg git-rev-list --header --topo-order --parents $parsed_args" r]
 
94
+       set commfd [open "|hg debug-rev-list --header --topo-order --parents $parsed_args" r]
 
95
     } err] {
 
96
-       puts stderr "Error executing hg git-rev-list: $err"
 
97
+       puts stderr "Error executing hg debug-rev-list: $err"
 
98
        exit 1
 
99
     }
 
100
     set leftover {}
 
101
@@ -113,7 +113,7 @@
 
102
            if {[string length $shortcmit] > 80} {
 
103
                set shortcmit "[string range $shortcmit 0 80]..."
 
104
            }
 
105
-           error_popup "Can't parse hg git-rev-list output: {$shortcmit}"
 
106
+           error_popup "Can't parse hg debug-rev-list output: {$shortcmit}"
 
107
            exit 1
 
108
        }
 
109
        set id [lindex $ids 0]
 
110
@@ -164,7 +164,7 @@
 
111
 }
 
112
 
 
113
 proc readcommit {id} {
 
114
-    if [catch {set contents [exec hg git-cat-file commit $id]}] return
 
115
+    if [catch {set contents [exec hg debug-cat-file commit $id]}] return
 
116
     parsecommit $id $contents 0 {}
 
117
 }
 
118
 
 
119
@@ -1708,7 +1708,7 @@
 
120
     }
 
121
 
 
122
     if {[catch {
 
123
-       set f [open [list | hg git-diff-tree --stdin -s -r -S$findstring \
 
124
+       set f [open [list | hg debug-diff-tree --stdin -s -r -S$findstring \
 
125
                         << $inputids] r]
 
126
     } err]} {
 
127
        error_popup "Error starting search process: $err"
 
128
@@ -1811,7 +1811,7 @@
 
129
     # start off a git-diff-tree process if needed
 
130
     if {$diffsneeded ne {}} {
 
131
        if {[catch {
 
132
-           set df [open [list | hg git-diff-tree -r --stdin << $diffsneeded] r]
 
133
+           set df [open [list | hg debug-diff-tree -r --stdin << $diffsneeded] r]
 
134
        } err ]} {
 
135
            error_popup "Error starting search process: $err"
 
136
            return
 
137
@@ -1843,7 +1843,7 @@
 
138
            if {[catch {close $df} err]} {
 
139
                stopfindproc
 
140
                bell
 
141
-               error_popup "Error in hg git-diff-tree: $err"
 
142
+               error_popup "Error in hg debug-diff-tree: $err"
 
143
            } elseif {[info exists findids]} {
 
144
                set ids $findids
 
145
                stopfindproc
 
146
@@ -2113,7 +2113,7 @@
 
147
        }
 
148
        $ctext insert end "\n"
 
149
     }
 
150
- 
 
151
+
 
152
     set comment {}
 
153
     if {[info exists parents($id)]} {
 
154
        foreach p $parents($id) {
 
155
@@ -2232,7 +2232,7 @@
 
156
            set gca $id
 
157
        } else {
 
158
            if {[catch {
 
159
-               set gca [exec hg git-merge-base $gca $id]
 
160
+               set gca [exec hg debug-merge-base $gca $id]
 
161
            } err]} {
 
162
                return {}
 
163
            }
 
164
@@ -2320,7 +2320,7 @@
 
165
     catch {unset grouphunks}
 
166
     set groupfilelast -1
 
167
     foreach p $parents($diffmergeid) {
 
168
-       set cmd [list | hg git-diff-tree -p $p $diffmergeid]
 
169
+       set cmd [list | hg debug-diff-tree -p $p $diffmergeid]
 
170
        set cmd [concat $cmd $mergefilelist($diffmergeid)]
 
171
        if {[catch {set f [open $cmd r]} err]} {
 
172
            error_popup "Error getting diffs: $err"
 
173
@@ -2764,7 +2764,7 @@
 
174
     set treediff {}
 
175
     set id [lindex $ids 0]
 
176
     set p [lindex $ids 1]
 
177
-    if [catch {set gdtf [open "|hg git-diff-tree -r $p $id" r]}] return
 
178
+    if [catch {set gdtf [open "|hg debug-diff-tree -r $p $id" r]}] return
 
179
     fconfigure $gdtf -blocking 0
 
180
     fileevent $gdtf readable [list gettreediffline $gdtf $ids]
 
181
 }
 
182
@@ -2800,7 +2800,7 @@
 
183
     set id [lindex $ids 0]
 
184
     set p [lindex $ids 1]
 
185
     set env(GIT_DIFF_OPTS) $diffopts
 
186
-    set cmd [list | hg git-diff-tree -r -p -C $p $id]
 
187
+    set cmd [list | hg debug-diff-tree -r -p -C $p $id]
 
188
     if {[catch {set bdf [open $cmd r]} err]} {
 
189
        puts "error getting diffs: $err"
 
190
        return
 
191
@@ -3387,7 +3387,7 @@
 
192
     set oldid [$patchtop.fromsha1 get]
 
193
     set newid [$patchtop.tosha1 get]
 
194
     set fname [$patchtop.fname get]
 
195
-    if {[catch {exec hg git-diff-tree -p $oldid $newid >$fname &} err]} {
 
196
+    if {[catch {exec hg debug-diff-tree -p $oldid $newid >$fname &} err]} {
 
197
        error_popup "Error creating patch: $err"
 
198
     }
 
199
     catch {destroy $patchtop}
 
200
@@ -3608,7 +3608,7 @@
 
201
 set datemode 0
 
202
 set boldnames 0
 
203
 set diffopts "-U 5 -p"
 
204
-set wrcomcmd "hg git-diff-tree --stdin -p --pretty"
 
205
+set wrcomcmd "hg debug-diff-tree --stdin -p --pretty"
 
206
 
 
207
 set mainfont {Helvetica 9}
 
208
 set textfont {Courier 9}