X-Git-Url: https://sipb.mit.edu/gitweb.cgi/ikiwiki.git/blobdiff_plain/823ec815d4fc9625d6fa3553ad03e9f2ff737659..dddd6aa99055d8505f73e39b12f049633d9cb4c3:/IkiWiki.pm

diff --git a/IkiWiki.pm b/IkiWiki.pm
index ee94ce659..a618836cf 100644
--- a/IkiWiki.pm
+++ b/IkiWiki.pm
@@ -338,7 +338,7 @@ sub getsetup () {
 		type => "string",
 		default => undef,
 		example => '^\.htaccess$',
-		description => "regexp of normally ignored source files to include",
+		description => "regexp of normally excluded files to include",
 		advanced => 1,
 		safe => 0, # regexp
 		rebuild => 1,
@@ -346,8 +346,8 @@ sub getsetup () {
 	exclude => {
 		type => "string",
 		default => undef,
-		example => '\.wav$',
-		description => "regexp of source files to ignore",
+		example => '^(*\.private|Makefile)$',
+		description => "regexp of files that should be skipped",
 		advanced => 1,
 		safe => 0, # regexp
 		rebuild => 1,
@@ -1819,6 +1819,7 @@ sub deptype (@) {
 	return $deptype;
 }
 
+my $file_prune_regexp;
 sub file_pruned ($;$) {
 	my $file=shift;
 	if (@_) {
@@ -1833,8 +1834,11 @@ sub file_pruned ($;$) {
 		return 0 if $file =~ m/$config{include}/;
 	}
 
-	my $regexp='('.join('|', @{$config{wiki_file_prune_regexps}}).')';
-	return $file =~ m/$regexp/;
+	if (! defined $file_prune_regexp) {
+		$file_prune_regexp='('.join('|', @{$config{wiki_file_prune_regexps}}).')';
+		$file_prune_regexp=qr/$file_prune_regexp/;
+	}
+	return $file =~ m/$file_prune_regexp/;
 }
 
 sub define_gettext () {