← Back to branch summary

~ubuntu-branches/ubuntu/utopic/libconfig-auto-perl/utopic

« back to all changes in this revision

Viewing changes to t/winini.t

  • Committer: Bazaar Package Importer
  • Author(s): gregor herrmann
  • Date: 2006-07-02 16:23:47 UTC
  • mfrom: (1.2.1 upstream) (2.1.2 edgy)
  • Revision ID: james.westby@ubuntu.com-20060702162347-k1xjyeutxzf4209k
* New upstream release.
* Set debhelper compatibility level to 5.
* Set Standards-Version to 3.7.2 (no changes needed).

Show diffs side-by-side

added added

removed removed

Lines of Context:
t/winini.t
 
1
use Test::More tests => 7;
 
2
use strict;
 
3
use warnings;
 
4
no warnings qw(once);
 
5
 
 
6
use File::Spec::Functions;
 
7
use_ok('Config::Auto');
 
8
 
 
9
my $config = Config::Auto::parse('win.ini',path => catdir('t','config'));
 
10
 
 
11
is($Config::Auto::Format,'ini','Config file ini formatted');
 
12
is(ref($config->{group1}),'HASH','Data structure');
 
13
is($config->{group1}{host},'proxy.some-domain-name.com','host name');
 
14
is($config->{group1}{port},'80','port');
 
15
is($config->{group1}{username},'blah','username');
 
16
is($config->{group1}{password},'doubleblah','password');
 
17