# HG changeset patch
# User heiko
# Date 1188822494 0
# Node ID 2fcd20b32b2ef62206add823a03b317efbc5d04a
# Parent  5bdd424012119aeec38a4b731d3f4a47cefbb83f
- die Config-Files auch wirklich finden (in Abhängigkeit von "Build"
  oder Runtime)

diff -r 5bdd42401211 -r 2fcd20b32b2e .build
diff -r 5bdd42401211 -r 2fcd20b32b2e Makefile
--- a/Makefile	Mon Sep 03 12:22:41 2007 +0000
+++ b/Makefile	Mon Sep 03 12:28:14 2007 +0000
@@ -1,12 +1,14 @@
 BIN = mimecut
 CLEANFILES = $(BIN)
 
-.PHONY: all clean install
+.PHONY: all clean install test
 
 all:	$(BIN)
 
-clean:
-	-rm -f $(CLEANFILES)
+test:	all
+	prove --timer t/
+
+clean:  ; -rm -f $(CLEANFILES)
 
 %:	%.pl
 	# $<
diff -r 5bdd42401211 -r 2fcd20b32b2e mimecut.pl
--- a/mimecut.pl	Mon Sep 03 12:22:41 2007 +0000
+++ b/mimecut.pl	Mon Sep 03 12:28:14 2007 +0000
@@ -8,10 +8,11 @@
 use MIME::Head;
 use Getopt::Long;
 use File::Basename;
+use FindBin qw($Bin);
 
 my $ME      = basename $0;
 my $MEPID   = $$;
-my $CONFDIR = '.';
+my $CONFDIR = -f "$Bin/.build" ? $Bin : "/etc/$0";
 my $LOGDIR  = '.';
 my $HELP    = <<EOF;
 Usage: