Commit 473ede56 authored by Nigel Kukard's avatar Nigel Kukard
Browse files

Syntax cleanup

parent 04b8da49
...@@ -84,12 +84,12 @@ use constant { ...@@ -84,12 +84,12 @@ use constant {
}; };
use constant { use constant {
ST_FILE_CHANGED => 1, ST_FILE_CHANGED => 1,
ST_DIR_NEW => 2, ST_DIR_NEW => 2,
ST_DIR_SYS => 4, ST_DIR_SYS => 4,
ST_DIR_CHANGED => 8, ST_DIR_CHANGED => 8,
ST_FILE_ATTR_CHANGED => 16, ST_FILE_ATTR_CHANGED => 16,
ST_FILE_NEW => 32, ST_FILE_NEW => 32
}; };
...@@ -185,7 +185,7 @@ if (!defined($configFile = $optctl{'config'})) { ...@@ -185,7 +185,7 @@ if (!defined($configFile = $optctl{'config'})) {
} }
# If we have a config file, read it in # If we have a config file, read it in
if (-f $configFile) { if (-f $configFile) {
# Use config file, ignore case # Use config file, ignore case
tie my %inifile, 'Config::IniFiles', ( tie my %inifile, 'Config::IniFiles', (
-file => $optctl{'config'}, -file => $optctl{'config'},
-nocase => 1 -nocase => 1
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment