- my ($objid,$refobjid,$fullrefname,$tagname) = @_;
- responder_send_command("supersedes $fullrefname=$objid");
- $supersedes{$fullrefname} = $objid;
+ my ($tagobjid,$refobjid,$fullrefname,$tagname) = @_;
+ responder_send_command("supersedes $fullrefname=$tagobjid");
+ $supersedes{$fullrefname} = $tagobjid;