From: Steven Schubiger <stsc@refcnt.org>
Date: Fri, 28 Jul 2017 20:08:39 +0000 (+0200)
Subject: make-html: add anchor links
X-Git-Url: http://git.refcnt.org/?p=lugs.git;a=commitdiff_plain;h=695665ad4417f553024366263ad60d65f3b612e7

make-html: add anchor links
---

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
 -