From 0a52e8fd82d80bdd1290f49c3187d3f72db39c75 Mon Sep 17 00:00:00 2001
From: joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071>
Date: Wed, 15 Mar 2006 03:24:34 +0000
Subject: config files now based on perl modules add MakeMaker foo for module

---
 IkiWiki/Setup/Standard.pm | 33 +++++++++++++++++++++++++++++++++
 1 file changed, 33 insertions(+)
 create mode 100644 IkiWiki/Setup/Standard.pm

(limited to 'IkiWiki')

diff --git a/IkiWiki/Setup/Standard.pm b/IkiWiki/Setup/Standard.pm
new file mode 100644
index 000000000..7be4f891a
--- /dev/null
+++ b/IkiWiki/Setup/Standard.pm
@@ -0,0 +1,33 @@
+#!/usr/bin/perl
+# Standard ikiwiki setup module.
+# Parameters to import should be all the standard ikiwiki config stuff,
+# plus hashes for cgiwrapper and svnwrapper, which specify any differing
+# config stuff for them and cause the wrappers to be made.
+
+package IkiWiki::Setup::Standard;
+
+use warnings;
+use strict;
+
+sub import {
+	my %setup=%{$_[1]};
+
+
+	::debug("generating wrappers..");
+	foreach my $wrapper (@{$setup{wrapper}}) {
+		::gen_wrapper(%::config, %setup, %{$wrapper});
+	}
+
+	::debug("rebuilding wiki..");
+	foreach my $c (keys %setup) {
+		$::config{$c}=::possibly_foolish_untaint($setup{$c})
+			if defined $setup{$c} && ! ref $setup{$c};
+	}
+	$::config{rebuild}=1;
+	::refresh();
+
+	::debug("done");
+	::saveindex();
+}
+
+1
-- 
cgit v1.2.3