Author: pebender
Date: Wed Sep 3 19:40:15 2008
New Revision: 3697
Modified:
trunk/gar-minimyth/script/meta/minimyth/files/source/rootfs/etc/rc.d.perl/init/lirc.pm
Log:
- Fixed bug that caused the perl init scripts to not enable wake-up via USB
LIRC devices.
Modified:
trunk/gar-minimyth/script/meta/minimyth/files/source/rootfs/etc/rc.d.perl/init/lirc.pm
==============================================================================
---
trunk/gar-minimyth/script/meta/minimyth/files/source/rootfs/etc/rc.d.perl/init/lirc.pm
(original)
+++
trunk/gar-minimyth/script/meta/minimyth/files/source/rootfs/etc/rc.d.perl/init/lirc.pm
Wed Sep 3 19:40:15 2008
@@ -15,7 +15,6 @@
sub _remote_wakeup_enable
{
my $self = shift;
- my $minimyth = shift;
my $device_list = shift;
if ((! -r '/sys/class/lirc') ||
@@ -43,7 +42,7 @@
}
close(FILE);
}
- if (! grep(/^$name$/, @{$device_list}))
+ if (! grep(/^$name,.*$/, @{$device_list}))
{
next;
}
--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups
"minimyth-commits" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at
http://groups.google.com/group/minimyth-commits?hl=en
-~----------~----~----~----~------~----~------~--~---