From 3df3634feb5d6cbed4d68008ff06b3df310f479b Mon Sep 17 00:00:00 2001
From: fukachan <fukachan>
Date: Wed, 17 Mar 2004 13:30:42 +0000
Subject: debug: show file list.

---
 fml/lib/FML/Merge/FML4/Config.pm | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/fml/lib/FML/Merge/FML4/Config.pm b/fml/lib/FML/Merge/FML4/Config.pm
index 12005e8a..ff70aefd 100644
--- a/fml/lib/FML/Merge/FML4/Config.pm
+++ b/fml/lib/FML/Merge/FML4/Config.pm
@@ -4,7 +4,7 @@
 #   All rights reserved. This program is free software; you can
 #   redistribute it and/or modify it under the same terms as Perl itself.
 #
-# $FML: Config.pm,v 1.1.1.1 2004/03/16 12:58:21 fukachan Exp $
+# $FML: Config.pm,v 1.2 2004/03/17 12:55:03 fukachan Exp $
 #
 
 package FML::Merge::FML4::Config;
@@ -279,6 +279,16 @@ sub backup_mode
 }
 
 
+#
+# debug
+#
+if ($0 eq __FILE__) {
+   for my $f (keys %$ml_home_dir_backup_target_files) {
+	print $f, "\n";
+   }
+}
+
+
 =head1 CODING STYLE
 
 See C<http://www.fml.org/software/FNF/> on fml coding style guide.
-- 
cgit v1.2.1