From 936dc6fc8ed7bbb05ad858c04894e317924fef8f Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Fri, 16 Jul 2010 16:05:59 -0400
Subject: [PATCH] add test of file replace

---
 t/replace.t | 34 ++++++++++++++++++++++++++++++++++
 1 file changed, 34 insertions(+)
 create mode 100755 t/replace.t

diff --git a/t/replace.t b/t/replace.t
new file mode 100755
index 000000000..7d91f772f
--- /dev/null
+++ b/t/replace.t
@@ -0,0 +1,34 @@
+#!/usr/bin/perl
+use warnings;
+use strict;
+use Test::More 'no_plan';
+
+# setup
+my $srcdir="t/tmp/src";
+my $destdir="t/tmp/dest";
+ok(! system("make -s ikiwiki.out"));
+ok(! system("mkdir -p $srcdir"));
+
+# runs ikiwiki to build test site
+sub runiki {
+	ok(! system("perl -I. ./ikiwiki.out -plugin html -underlaydir=underlays/basewiki -set underlaydirbase=underlays -templatedir=templates $srcdir $destdir @_"));
+}
+sub refreshiki {
+	runiki();
+}
+sub setupiki {
+	ok(! system("rm -rf $srcdir/.ikiwiki $destdir"));
+	runiki("--rebuild");
+}
+
+# At one point, changing the extension of the source file of a page caused
+# ikiwiki to fail.
+ok(! system("touch $srcdir/foo.mdwn"));
+setupiki();
+ok(! system("mv $srcdir/foo.mdwn $srcdir/foo.html"));
+refreshiki();
+
+# Changing a non-page file into a page could also cause ikiwiki to fail.
+
+# cleanup
+ok(! system("rm -rf t/tmp"));
-- 
2.32.0.93.g670b81a890