File: test-no-internet

package info (click to toggle)
libflickr-api-perl 1.01-3
  • links: PTS, VCS
  • area: main
  • in suites: squeeze
  • size: 72 kB
  • ctags: 16
  • sloc: perl: 211; makefile: 16
file content (24 lines) | stat: -rw-r--r-- 579 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Index: test.pl
===================================================================
--- libflickr-api-perl.orig/test.pl
+++ libflickr-api-perl/test.pl
@@ -13,6 +13,9 @@
 		'key' => 'made_up_key',
 		'secret' => 'my_secret',
 	});
+
+SKIP: {
+skip("No internet connections during Debian builds", 2) if ($ENV{DEBIAN_BUILD});
 my $rsp = $api->execute_method('fake.method', {});
 
 
@@ -41,8 +44,8 @@
 }else{
 	is(1, 1, "skipping error code check, since we couldn't reach the API");
 }
+}
 
-
 ##################################################
 #
 # check the signing works properly