diff options
| author |  Steven Schubiger <stsc@refcnt.org>
| 2017-07-28 22:08:39 +0200 |
|---|---|---|
| committer | Steven Schubiger <stsc@refcnt.org>
| 2017-07-28 22:08:39 +0200 |
| commit | 695665ad4417f553024366263ad60d65f3b612e7 (patch) | |
| tree | 5df09628a3ba4be67bfd1302a063f6b59c9fe142 | |
| parent | 94de2ec30537b46bd1fcefdebd55bdf731c0e1f3 (diff) | |
| download | lugs-695665ad4417f553024366263ad60d65f3b612e7.tar.gz lugs-695665ad4417f553024366263ad60d65f3b612e7.tar.bz2 | |
make-html: add anchor links
| -rwxr-xr-x | make-html/make-html.pl | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/make-html/make-html.pl b/make-html/make-html.pl index c503cf5..3dcd603 100755 --- a/make-html/make-html.pl +++ b/make-html/make-html.pl @@ -9,7 +9,7 @@ use strict; use warnings; use lib qw(lib); -my $VERSION = '0.06'; +my $VERSION = '0.07'; #----------------------- # Start of configuration @@ -224,9 +224,10 @@ sub process_events my $ics_file = "$anchor.ics"; my $ics_link = join '/', ($Config->{ical_dir}, $ics_file); - $self->print_template('ical', + $self->print_template('ical/anker', { - LINK => $ics_link, + LINK => $ics_link, + ANKER => $anchor, }); $self->print_raw_html('</tr>'); @@ -359,9 +360,9 @@ __DATA__ - <br>[% INFORMATIONEN %] -# ical +# ical/anker - -<td valign=top><a href="[% LINK %]">iCal</a></td> +<td valign=top><a href="[% LINK %]">iCal</a><br><a href="#[% ANKER %]">#</a></td> # tabellenende - |