← Back to branch summary

~ubuntu-branches/ubuntu/natty/libconfig-inifiles-perl/natty

« back to all changes in this revision

Viewing changes to t/13val-in-list-context.t

  • Committer: Bazaar Package Importer
  • Author(s): Jonas Smedegaard, gregor herrmann
  • Date: 2009-01-24 22:25:26 UTC
  • mfrom: (1.1.2 upstream)
  • Revision ID: james.westby@ubuntu.com-20090124222526-uutu8jg5r4vrfljq
Tags: 2.47-1
[ Jonas Smedegaard ]
* New upstream release. Closes: bug#430426, #380280.
* Depend on ${misc:Depends}.
* Fix Vcs-* fields to point to refer to correct package.
* Update CDBS snippets:
  + Update copyright-check output to more closely match proposed new
    copyright file format
  + Simplify internal variables
  + Ignore no files by default in copyright-check.mk
  + Correct and update copyright hints of the snippets themselves
  + Move dependency cleanup to new local snippet package-relations.mk.
* Update debian/copyright and copyright hints:
  + Rewrite debian/copyright using new file format, version 428
  + Add info on CDBS snippets (new owners, no new licenses)
* Add DEB_MAINTAINER_MODE in debian/rules (thanks to Romain Beauxis).

[ gregor herrmann ]
* debian/watch: use dist-based URL.
* debian/control: Changed: Switched Vcs-Browser field to ViewSVN
  (source stanza).

Show diffs side-by-side

added added

removed removed

Lines of Context:
t/13val-in-list-context.t
 
1
#!/usr/bin/perl
 
2
 
 
3
# Fixes:
 
4
# https://sourceforge.net/tracker/index.php?func=detail&aid=767913&group_id=6926&atid=106926
 
5
 
 
6
use Test::More tests => 1;
 
7
 
 
8
use strict;
 
9
use warnings;
 
10
 
 
11
use File::Spec;
 
12
 
 
13
use Config::IniFiles;
 
14
 
 
15
{
 
16
    my $ini = Config::IniFiles->new(
 
17
        -file => File::Spec->catfile('t', 'array.ini')
 
18
    );
 
19
 
 
20
 
 
21
    my $verdict;
 
22
    if (my @v = $ini->val("Sect", "NotExist"))
 
23
    {
 
24
        $verdict = 1;
 
25
    }
 
26
    else
 
27
    {
 
28
        $verdict = 0;
 
29
    }
 
30
 
 
31
    # TEST
 
32
    ok(!$verdict, "False should be returned in list context.");
 
33
}
 
34