From 06722d6f96352c48fa1c1898580bab093b8cf61d Mon Sep 17 00:00:00 2001
From: ISHIKAWA Mutsumi <ishikawa@hanzubon.jp>
Date: Sat, 20 Oct 2012 15:45:02 +0900
Subject: [PATCH] fix config handling

---
 mubot4fb.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/mubot4fb.pl b/mubot4fb.pl
index 04b2a43..e0a70e6 100755
--- a/mubot4fb.pl
+++ b/mubot4fb.pl
@@ -319,8 +319,8 @@ use Config::Simple;
 my $config_name = $ARGV[0] || 'not_found';
 
 my %cfg;
-my $config_path = ('/etc/mubot4fb/', $ENV{HOME} . '/.mubot4fb/', $ENV{PWD} . '/mubot4fb_');
-foreach my $c ($config_path) {
+my @config_path = ('/etc/mubot4fb/', $ENV{HOME} . '/.mubot4fb/', $ENV{PWD} . '/mubot4fb_');
+foreach my $c (@config_path) {
 	my $config = $c . $config_name . '.conf';
 	Config::Simple->import_from($config, \%cfg) if (-e $config);
 }
-- 
2.11.0