~ubuntu-branches/ubuntu/precise/padre/precise

« back to all changes in this revision

Viewing changes to t/win32/010-file-new.t

  • Committer: Bazaar Package Importer
  • Author(s): Damyan Ivanov
  • Date: 2010-05-08 09:17:22 UTC
  • mfrom: (1.2.1 upstream) (10.1.1 sid)
  • Revision ID: james.westby@ubuntu.com-20100508091722-y6008jtk0ap6znyn
Tags: 0.60.ds1-3
rules: run tests with HOME=$fake_home to avoud failing when $HOME points
to a non-existent location. Closes: #579289

Show diffs side-by-side

added added

removed removed

Lines of Context:
13
13
if ($@) {
14
14
        plan skip_all => 'Win32::GuiTest is required for this test';
15
15
}
 
16
plan( skip_all => 'test is currently broken' );
16
17
 
17
18
use t::lib::Padre;
18
19
require t::lib::Padre::Win32;
106
107
sub slurp {
107
108
        if ( open( my $fh, '<', $save_to ) ) {
108
109
                local $/;
109
 
                return <$fh>;
 
110
                my $rv = <$fh>;
 
111
                close $fh;
 
112
                return $rv;
110
113
        } else {
111
114
                warn("Could not open file $save_to  $!");
112
115
                return;