File: nameref.perl

package info (click to toggle)
latex2html 2023-debian1-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 6,924 kB
  • sloc: perl: 34,024; makefile: 437; sh: 32
file content (37 lines) | stat: -rw-r--r-- 768 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
# -*- perl -*-
#
# $Id:  $
#
# nameref.perl
#   Georgy Salnikov <sge@nmr.nioch.nsc.ru> 02/01/21
#
# Extension to LaTeX2HTML V2020 to support the "nameref" package
#
# $Log:  $
#
# Note:
# This package provides formatting references with section name
# but without section number. The support is extremely primitive.

package main;

# for debugging only
#print "\nUsing nameref.perl\n";

# &process_ref does everything...
sub do_cmd_nameref {
  local($_) = @_;
  &process_ref($cross_ref_mark, $name_ref_mark);
}

sub do_cmd_Nameref {
  local($arg) = @_;
  join('', "'", &do_cmd_nameref($arg), "' on page ", &do_cmd_pageref($arg));
}

&process_commands_wrap_deferred (<<_RAW_ARG_DEFERRED_CMDS_);
nameref # {}
Nameref # {}
_RAW_ARG_DEFERRED_CMDS_

1;	# Must be last line