don't display warnings in tests

Author: SimonDanisch

test/error_handling.jl

@@ -3,7 +3,9 @@ context("Not installed") do
 
 	add_format(format"NotInstalled", (), ".not_installed", [:NotInstalled])
 	stdin_copy = STDIN
-	rs, wr = redirect_stdin()
+    stderr_copy = STDERR
+    rs, wr = redirect_stdin()
+	rserr, wrerr = redirect_stderr()
 	ref = @async save("test.not_installed")
 	println(wr, "y")
 	if VERSION < v"0.4.0-dev"
@@ -16,8 +18,11 @@ context("Not installed") do
 	println(wr, "n") # don't install
 	wait(ref)
 	@fact istaskdone(ref) --> true
+
+    close(rs);close(wr);close(rserr);close(wrerr)
 	redirect_stdin(stdin_copy)
-	close(rs);close(wr);
+    redirect_stderr(stderr_copy)
+
 	eval(Base, :(is_interactive = false)) # for interactive error handling
 
 end

test/query.jl

@@ -7,19 +7,19 @@ if VERSION < v"0.4.0-dev"
 end
 
 context("OS") do
-    @linux_only begin
+    if is_linux()
         @fact FileIO.applies_to_os(FileIO.Linux)   --> true
         @fact FileIO.applies_to_os(FileIO.OSX)     --> false
         @fact FileIO.applies_to_os(FileIO.Unix)    --> true
         @fact FileIO.applies_to_os(FileIO.Windows) --> false
     end
-    @osx_only begin
+    if is_apple()
         @fact FileIO.applies_to_os(FileIO.Linux)   --> false
         @fact FileIO.applies_to_os(FileIO.OSX)     --> true
         @fact FileIO.applies_to_os(FileIO.Unix)    --> true
         @fact FileIO.applies_to_os(FileIO.Windows) --> false
     end
-    @windows_only begin
+    if is_windows()
         @fact FileIO.applies_to_os(FileIO.Linux)   --> false
         @fact FileIO.applies_to_os(FileIO.OSX)     --> false
         @fact FileIO.applies_to_os(FileIO.Unix)    --> false
@@ -227,14 +227,16 @@ try
     context("multiple libs") do
         lensave0 = length(FileIO.sym2saver)
         lenload0 = length(FileIO.sym2loader)
-        OSKey = @osx ? FileIO.OSX : @windows? FileIO.Windows : @linux ? FileIO.Linux : error("os not supported")
+        OSKey = is_apple() ? FileIO.OSX : is_windows() ? FileIO.Windows : is_linux() ? FileIO.Linux : error("os not supported")
         add_format(
             format"MultiLib",
             UInt8[0x42,0x4d],
             ".mlb",
             [:LoadTest1, FileIO.LOAD, OSKey],
             [:LoadTest2]
         )
+        stderr_copy = STDERR
+        rd,wr = redirect_stderr()
         @fact lensave0 + 1 --> length(FileIO.sym2saver)
         @fact lenload0 + 1 --> length(FileIO.sym2loader)
         @fact length(FileIO.sym2loader[:MultiLib]) --> 2
@@ -250,6 +252,8 @@ try
         @fact isdefined(:LoadTest1) --> true # first module should load first but fail
         @fact x --> 42
         rm(fn)
+        close(rd);close(wr)
+        redirect_stderr(stderr_copy)
     end
 finally
     # Restore the registry