[Slim-Checkins] r12515 - /trunk/server/Slim/Utils/Misc.pm

mherger at svn.slimdevices.com mherger at svn.slimdevices.com
Thu Aug 9 03:12:14 PDT 2007


Author: mherger
Date: Thu Aug  9 03:12:13 2007
New Revision: 12515

URL: http://svn.slimdevices.com?rev=12515&view=rev
Log:
Bug: n/a
Description: hide hidden & system files and folders on Windows - but don't break other systems...

Modified:
    trunk/server/Slim/Utils/Misc.pm

Modified: trunk/server/Slim/Utils/Misc.pm
URL: http://svn.slimdevices.com/trunk/server/Slim/Utils/Misc.pm?rev=12515&r1=12514&r2=12515&view=diff
==============================================================================
--- trunk/server/Slim/Utils/Misc.pm (original)
+++ trunk/server/Slim/Utils/Misc.pm Thu Aug  9 03:12:13 2007
@@ -64,11 +64,11 @@
 	if ($^O =~ /Win32/) {
 		require Win32;
 		require Win32::API;
+		require Win32::File;
 		require Win32::FileOp;
 		require Win32::Process;
 		require Win32::Service;
 		require Win32::Shortcut;
-		use Win32::File qw(GetAttributes HIDDEN SYSTEM);
 	}
 }
 
@@ -860,8 +860,8 @@
 		# Don't display hidden/system files on Windows
 		if (Slim::Utils::OSDetect::OS() eq "win") {
 			my $attributes;
-			GetAttributes($fullpath, $attributes);
-			next if ($attributes & HIDDEN) || ($attributes & SYSTEM);
+			Win32::File::GetAttributes($fullpath, $attributes);
+			next if ($attributes & Win32::File::HIDDEN()) || ($attributes & Win32::File::SYSTEM());
 		}
 
 



More information about the checkins mailing list