sub li {
  my ($t,$elt) = @_;
  my $e = $elt->parent('[@conref != ""]'); # p removed
  if ( defined $e ){
    print $e->tag." ".$elt->text."\n";
  }
}