Browse Source

Merge git://git.kernel.org/pub/scm/gitk/gitk

* git://git.kernel.org/pub/scm/gitk/gitk:
  [PATCH] gitk: rereadrefs needs listrefs
maint
Junio C Hamano 19 years ago
parent
commit
b642d9ef64
  1. 18
      gitk

18
gitk

@ -5196,6 +5196,24 @@ proc rereadrefs {} { @@ -5196,6 +5196,24 @@ proc rereadrefs {} {
}
}

proc listrefs {id} {
global idtags idheads idotherrefs

set x {}
if {[info exists idtags($id)]} {
set x $idtags($id)
}
set y {}
if {[info exists idheads($id)]} {
set y $idheads($id)
}
set z {}
if {[info exists idotherrefs($id)]} {
set z $idotherrefs($id)
}
return [list $x $y $z]
}

proc showtag {tag isnew} {
global ctext tagcontents tagids linknum


Loading…
Cancel
Save