e-smith-base/sme7/e-smith-base-4.18.0-run.static.patch

diff -Nur -x '*.orig' -x '*.rej' e-smith-base-4.18.0/root/var/service/wan/run.static mezzanine_patched_e-smith-base-4.18.0/root/var/service/wan/run.static
--- e-smith-base-4.18.0/root/var/service/wan/run.static 2007-01-26 20:56:31.000000000 -0500
+++ mezzanine_patched_e-smith-base-4.18.0/root/var/service/wan/run.static       2007-03-01 12:28:23.000000000 -0500
@@ -1,5 +1,10 @@
-#! /bin/sh
+#! /usr/bin/perl
 
-name=$(/sbin/e-smith/config getprop ExternalInterface Name)
-/sbin/ifup $name
-exec pause
+use warnings;
+use strict;
+use esmith::ConfigDB;
+use POSIX;
+
+my $db = esmith::ConfigDB->open_ro;
+system("/sbin/ifup", $db->get_prop('ExternalInterface', 'Name'));
+pause();
1	slords	1.1	diff -Nur -x '.orig' -x '.rej' e-smith-base-4.18.0/root/var/service/wan/run.static mezzanine_patched_e-smith-base-4.18.0/root/var/service/wan/run.static
2			--- e-smith-base-4.18.0/root/var/service/wan/run.static 2007-01-26 20:56:31.000000000 -0500
3			+++ mezzanine_patched_e-smith-base-4.18.0/root/var/service/wan/run.static 2007-03-01 12:28:23.000000000 -0500
4			@@ -1,5 +1,10 @@
5			-#! /bin/sh
6			+#! /usr/bin/perl
7
8			-name=$(/sbin/e-smith/config getprop ExternalInterface Name)
9			-/sbin/ifup $name
10			-exec pause
11			+use warnings;
12			+use strict;
13			+use esmith::ConfigDB;
14			+use POSIX;
15			+
16			+my $db = esmith::ConfigDB->open_ro;
17			+system("/sbin/ifup", $db->get_prop('ExternalInterface', 'Name'));
18			+pause();