--- a/contrib/hgk Tue Apr 11 08:42:07 2006 +0200
+++ b/contrib/hgk Tue Apr 11 12:44:13 2006 +0200
@@ -3448,7 +3448,7 @@
return
}
if {[catch {
- set out [exec hg tag $tag $id]
+ set out [exec hg tag -r $id $tag]
} err]} {
error_popup "Error creating tag: $err"
return