From 950850f63911d7f54f23e0699f820369b32a3532 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 27 Jul 2008 16:01:29 -0400 Subject: add new wiki to wikilist --- IkiWiki/Setup/Automator.pm | 11 +++++++++++ 1 file changed, 11 insertions(+) (limited to 'IkiWiki/Setup') diff --git a/IkiWiki/Setup/Automator.pm b/IkiWiki/Setup/Automator.pm index 202c5541c..b5cf8fb48 100644 --- a/IkiWiki/Setup/Automator.pm +++ b/IkiWiki/Setup/Automator.pm @@ -110,6 +110,17 @@ sub import (@) { #{{{ die "ikiwiki --wrappers --setup $config{dumpsetup} failed"; } + # Add it to the wikiwiki. + mkpath("$ENV{HOME}/.ikiwiki"); + open (WIKILIST, ">>$ENV{HOME}/.ikiwiki/wikilist") || die "$ENV{HOME}/.ikiwiki/wikilist: $!"; + print WIKILIST "$ENV{USER} $config{dumpsetup}\n"; + close WIKILIST; + if (system("ikiwiki-update-wikilist") != 0) { + print STDERR "** Failed to add you to the system wikilist file.\n"; + print STDERR "** (Probably ikiwiki-update-wikilist is not SUID root.)\n"; + print STDERR "** Your wiki will not be automatically updated when ikiwiki is upgraded.\n"; + } + # Done! print "\n\nSuccessfully set up $config{wikiname}:\n"; foreach my $key (qw{url srcdir destdir repository}) { -- cgit v1.2.3