Author: pebender
Date: Tue Dec 2 01:54:15 2008
New Revision: 4038
Modified:
trunk/gar-minimyth/script/meta/minimyth/files/source/rootfs/etc/rc.d.sh/init.d/lirc
trunk/gar-minimyth/script/meta/minimyth/files/source/rootfs/etc/rc.d/init/lirc.pm
Log:
- Did some minor clean-up of and removal of obsolete from the lirc init
scripts.
Modified:
trunk/gar-minimyth/script/meta/minimyth/files/source/rootfs/etc/rc.d.sh/init.d/lirc
==============================================================================
---
trunk/gar-minimyth/script/meta/minimyth/files/source/rootfs/etc/rc.d.sh/init.d/lirc
(original)
+++
trunk/gar-minimyth/script/meta/minimyth/files/source/rootfs/etc/rc.d.sh/init.d/lirc
Tue Dec 2 01:54:15 2008
@@ -29,7 +29,7 @@
continue
fi
- name="/dev/`/sbin/udevadm info --query=name
--path=/sys/class/lirc/${lirc}`"
+ name="/dev/`/sbin/udevadm info --query=name --root
--path=/sys/class/lirc/${lirc}`"
/bin/echo " ${device_list}" | grep -q " ${name},"
if /usr/bin/test $? -ne 0 ; then
continue
Modified:
trunk/gar-minimyth/script/meta/minimyth/files/source/rootfs/etc/rc.d/init/lirc.pm
==============================================================================
---
trunk/gar-minimyth/script/meta/minimyth/files/source/rootfs/etc/rc.d/init/lirc.pm
(original)
+++
trunk/gar-minimyth/script/meta/minimyth/files/source/rootfs/etc/rc.d/init/lirc.pm
Tue Dec 2 01:54:15 2008
@@ -7,8 +7,6 @@
use strict;
use warnings;
-require Cwd;
-require File::Copy;
require MiniMyth;
sub _remote_wakeup_enable
@@ -31,12 +29,12 @@
foreach my $lirc (@lirc_list)
{
my $name = '';
- if (open(FILE, '-|', "/sbin/udevadm info --query=name
--path=/sys/class/lirc/$lirc"))
+ if (open(FILE, '-|', qq(/sbin/udevadm info --query=name --root
--path='/sys/class/lirc/$lirc')))
{
while (<FILE>)
{
chomp;
- $name = "/dev/$_";
+ $name = $_;
last;
}
close(FILE);
@@ -287,9 +285,6 @@
my @device_args = split(/,/, $device_item);
my $device = $device_args[0];
my $driver = $device_args[1];
-
- # Convert device to the actual device rather than the symbolic
link.
- $device = Cwd::abs_path($device);
# Convert driver to the the lirc daemon appropriate driver.
if (($driver) && (open(FILE, '-|', '/usr/sbin/lircd --driver=help
2>&1')))
--~--~---------~--~----~------------~-------~--~----~
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
-~----------~----~----~----~------~----~------~--~---
