contrib/hgk
changeset 2058 7e0dd64b0718
parent 1430 c91966c3bbf5
child 2297 936b615eb44e
equal deleted inserted replaced
2057:fef2d653beaf 2058:7e0dd64b0718
  3446     if {[info exists tagids($tag)]} {
  3446     if {[info exists tagids($tag)]} {
  3447 	error_popup "Tag \"$tag\" already exists"
  3447 	error_popup "Tag \"$tag\" already exists"
  3448 	return
  3448 	return
  3449     }
  3449     }
  3450     if {[catch {
  3450     if {[catch {
  3451 	set out [exec hg tag $tag $id]
  3451 	set out [exec hg tag -r $id $tag]
  3452     } err]} {
  3452     } err]} {
  3453 	error_popup "Error creating tag: $err"
  3453 	error_popup "Error creating tag: $err"
  3454 	return
  3454 	return
  3455     }
  3455     }
  3456 
  3456