Import p5-CGI-Kwiki 0.18

A Wiki is a website that allows its users to add pages, and edit any
existing pages.

You can create a new kwiki website with a single command. The module
has no prerequisite modules, except the ones that ship with Perl.
It doesn't require a database backend, although it could be made to
use one. The default kwiki behaviour is fairly full featured, and includes
support for html tables. Any behaviour of the kwiki can be customized,
without much trouble.

9 files changed, 137 insertions, 0 deletions

diff --git a/www/p5-CGI-Kwiki/DESCR b/www/p5-CGI-Kwiki/DESCR
new file mode 100644
index 00000000000..3720e6cc7e5
--- /dev/null
+++ b/www/p5-CGI-Kwiki/DESCR
@@ -0,0 +1,9 @@
+A Wiki is a website that allows its users to add pages, and edit any
+existing pages. 
+
+You can create a new kwiki website with a single command. The module
+has no prerequisite modules, except the ones that ship with Perl.
+It doesn't require a database backend, although it could be made to
+use one. The default kwiki behaviour is fairly full featured, and includes
+support for html tables. Any behaviour of the kwiki can be customized,
+without much trouble.
diff --git a/www/p5-CGI-Kwiki/MESSAGE b/www/p5-CGI-Kwiki/MESSAGE
new file mode 100644
index 00000000000..1ea75a09fe7
--- /dev/null
+++ b/www/p5-CGI-Kwiki/MESSAGE
@@ -0,0 +1,22 @@
+===========================================================================
+$NetBSD: MESSAGE,v 1.1.1.1 2004/05/13 09:22:30 mjl Exp $
+
+  To actually install Kwiki, make a directory in your web server's
+  document root and run "kwiki-install". This will set up all necessary
+  files.
+
+  You may need to adjust your web server's configuration a bit
+  to run cgi scripts from that directory, adapt the following sample
+  config snippet to taste:
+
+	Alias /kwiki/ /home/www/htdocs/kwiki/
+	<Directory /home/www/htdocs/kwiki/>
+		Order allow,deny
+		Allow from all
+		AllowOverride None
+		Options ExecCGI
+		AddHandler cgi-script .cgi
+		DirectoryIndex index.cgi
+	</Directory>
+
+===========================================================================
diff --git a/www/p5-CGI-Kwiki/Makefile b/www/p5-CGI-Kwiki/Makefile
new file mode 100644
index 00000000000..73822c1c0cb
--- /dev/null
+++ b/www/p5-CGI-Kwiki/Makefile
@@ -0,0 +1,26 @@
+# $NetBSD: Makefile,v 1.1.1.1 2004/05/13 09:22:30 mjl Exp $
+#
+
+DISTNAME=       	CGI-Kwiki-0.18
+PKGNAME=        	p5-${DISTNAME}
+SVR4_PKGNAME=		p5ckw
+CATEGORIES=		www perl5
+MASTER_SITES=		${MASTER_SITE_PERL_CPAN:=CGI/}
+
+MAINTAINER=		tech-pkg@NetBSD.org
+HOMEPAGE=		http://www.kwiki.org/
+COMMENT=		A Quickie Wiki that's not too Tricky
+
+DEPENDS+=		p5-Test-Simple>=0.47:../../devel/p5-Test-Simple
+DEPENDS+=		p5-Locale-Maketext>=1.08:../../misc/p5-Locale-Maketext
+
+USE_BUILDLINK3=		YES
+PERL5_PACKLIST=		${PERL5_SITEARCH}/auto/CGI-Kwiki/.packlist
+
+.include "../../mk/bsd.prefs.mk"
+
+post-patch:
+	@${FIND} ${WRKSRC} -name '*.orig' -print | ${XARGS} ${RM} -f
+
+.include "../../lang/perl5/module.mk"
+.include "../../mk/bsd.pkg.mk"
diff --git a/www/p5-CGI-Kwiki/PLIST b/www/p5-CGI-Kwiki/PLIST
new file mode 100644
index 00000000000..2ec1a443e0e
--- /dev/null
+++ b/www/p5-CGI-Kwiki/PLIST
@@ -0,0 +1 @@
+@comment $NetBSD: PLIST,v 1.1.1.1 2004/05/13 09:22:30 mjl Exp $
diff --git a/www/p5-CGI-Kwiki/distinfo b/www/p5-CGI-Kwiki/distinfo
new file mode 100644
index 00000000000..44508f4ac55
--- /dev/null
+++ b/www/p5-CGI-Kwiki/distinfo
@@ -0,0 +1,8 @@
+$NetBSD: distinfo,v 1.1.1.1 2004/05/13 09:22:30 mjl Exp $
+
+SHA1 (CGI-Kwiki-0.18.tar.gz) = 1c2fc5b172f6ef9b0f4fe45f10c7033c57fa4d0c
+Size (CGI-Kwiki-0.18.tar.gz) = 76855 bytes
+SHA1 (patch-aa) = 19d182028f5747b0bf9948aa7be3209cb73107cf
+SHA1 (patch-ab) = e96fba2836405db07f2999b84c0ea43ec818ac99
+SHA1 (patch-ac) = 94dc4ebe05ec75625196c5476ace108826a5e762
+SHA1 (patch-ad) = ff33b19f8824b57cfbef3d8184fabb7b812c9a91
diff --git a/www/p5-CGI-Kwiki/patches/patch-aa b/www/p5-CGI-Kwiki/patches/patch-aa
new file mode 100644
index 00000000000..23a46c6a263
--- /dev/null
+++ b/www/p5-CGI-Kwiki/patches/patch-aa
@@ -0,0 +1,16 @@
+$NetBSD: patch-aa,v 1.1.1.1 2004/05/13 09:22:30 mjl Exp $
+
+This is the Patch from
+http://www.kwiki.org/index.cgi?PatchChangesTwoWeeks
+
+--- lib/CGI/Kwiki/Changes.pm.orig	Mon Aug 25 22:45:05 2003
++++ lib/CGI/Kwiki/Changes.pm	Thu May 13 10:56:32 2004
+@@ -34,7 +34,7 @@
+          [$self->loc("2 days"), 2],
+          [$self->loc("3 days"), 3],
+          [$self->loc("week"), 7],
+-         [$self->loc("2 weeks"), 7],
++         [$self->loc("2 weeks"), 14],
+          [$self->loc("month"), 30],
+          [$self->loc("3 months"), 90],
+         ) {
diff --git a/www/p5-CGI-Kwiki/patches/patch-ab b/www/p5-CGI-Kwiki/patches/patch-ab
new file mode 100644
index 00000000000..aa61f314ed1
--- /dev/null
+++ b/www/p5-CGI-Kwiki/patches/patch-ab
@@ -0,0 +1,16 @@
+$NetBSD: patch-ab,v 1.1.1.1 2004/05/13 09:22:30 mjl Exp $
+
+This is the patch from
+http://www.kwiki.org/index.cgi?PatchDeleteUnlockBug
+
+
+--- lib/CGI/Kwiki/Database.pm.orig	Mon Aug 25 22:45:05 2003
++++ lib/CGI/Kwiki/Database.pm	Thu May 13 10:58:02 2004
+@@ -36,6 +36,7 @@
+ sub unlock {
+     my ($self, $page_id) = @_;
+     my $lock_handle = $self->lock_handle;
++       return unless -e $lock_handle;
+     flock($lock_handle, LOCK_UN) 
+       or die "Can't unlock $page_id\n:$!";
+     close $lock_handle;
diff --git a/www/p5-CGI-Kwiki/patches/patch-ac b/www/p5-CGI-Kwiki/patches/patch-ac
new file mode 100644
index 00000000000..9294c4d79fc
--- /dev/null
+++ b/www/p5-CGI-Kwiki/patches/patch-ac
@@ -0,0 +1,22 @@
+$NetBSD: patch-ac,v 1.1.1.1 2004/05/13 09:22:30 mjl Exp $
+
+This is the patch from
+http://www.kwiki.org/index.cgi?PatchDeleteUnlockBug
+
+
+--- lib/CGI/Kwiki/Edit.pm.orig	Mon Aug 25 22:45:05 2003
++++ lib/CGI/Kwiki/Edit.pm	Thu May 13 10:58:02 2004
+@@ -144,12 +144,11 @@
+ }
+ 
+ sub delete {
++    # note: locking still exists outside this in the save() sub
+     my ($self) = @_;
+     my $page_id = $self->cgi->page_id;
+-    $self->database->lock($page_id);
+     $self->database->delete($self->cgi->page_id);
+     $self->cgi->page_id('');
+-    $self->database->unlock($page_id);
+ }
+ 
+ 1;
diff --git a/www/p5-CGI-Kwiki/patches/patch-ad b/www/p5-CGI-Kwiki/patches/patch-ad
new file mode 100644
index 00000000000..8edb06935aa
--- /dev/null
+++ b/www/p5-CGI-Kwiki/patches/patch-ad
@@ -0,0 +1,17 @@
+$NetBSD: patch-ad,v 1.1.1.1 2004/05/13 09:22:30 mjl Exp $
+
+This is the patch from
+http://www.kwiki.org/index.cgi?PatchIfEndIfElseEnd
+
+
+--- lib/CGI/Kwiki/Template.pm.orig	Thu Sep 11 00:49:34 2003
++++ lib/CGI/Kwiki/Template.pm	Thu May 13 11:00:04 2004
+@@ -43,7 +43,7 @@
+ sub render {
+     my ($self, $template, %v) = @_;
+     $template =~ s{\[%\s+IF\s+(\w+)\s+%\]
+-                   (.*?)
++                   ( (?:(?!\[%\s+END\s+%\]).)*? )
+                    \[%\s+ELSE\s+%\]
+                    (.*?)
+                    \[%\s+END\s+%\]