diff options
author | Sergey Poznyakoff <gray@gnu.org.ua> | 2018-07-09 22:39:25 +0200 |
---|---|---|
committer | Sergey Poznyakoff <gray@gnu.org.ua> | 2018-07-09 22:39:25 +0200 |
commit | db3dbb29a2ad58ef2f43d3f9d250e7f90aeaf278 (patch) | |
tree | fa84a90f7f6b304b083c746aeb09a9cc853c3035 /lib/Config/Parser | |
parent | eda00b0eaa069d5631efec255ef162b695d73d33 (diff) | |
download | config-parser-db3dbb29a2ad58ef2f43d3f9d250e7f90aeaf278.tar.gz config-parser-db3dbb29a2ad58ef2f43d3f9d250e7f90aeaf278.tar.bz2 |
Use Text::Locus
Diffstat (limited to 'lib/Config/Parser')
-rw-r--r-- | lib/Config/Parser/Ini.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Config/Parser/Ini.pm b/lib/Config/Parser/Ini.pm index b3a1ef9..3b39a16 100644 --- a/lib/Config/Parser/Ini.pm +++ b/lib/Config/Parser/Ini.pm | |||
@@ -53,7 +53,7 @@ sub _readconfig { | |||
53 | s/#.*//; | 53 | s/#.*//; |
54 | next if ($_ eq ""); | 54 | next if ($_ eq ""); |
55 | 55 | ||
56 | my $locus = new Config::Tree::Locus($file, $line); | 56 | my $locus = new Text::Locus($file, $line); |
57 | 57 | ||
58 | if (/^\[(.+?)\]$/) { | 58 | if (/^\[(.+?)\]$/) { |
59 | @path = parse_line('\s+', 0, $1); | 59 | @path = parse_line('\s+', 0, $1); |