From 1fb0997c705660b0232b2df71b11a1b0ef32992d Mon Sep 17 00:00:00 2001
From: "D. V. Serg" <dvserg@pfsense.org>
Date: Fri, 12 Dec 2008 06:00:16 +0000
Subject: perl LN fix

---
 packages/lightsquid/lightsquid.inc | 15 ++++++++++++---
 packages/lightsquid/lightsquid.xml |  2 +-
 2 files changed, 13 insertions(+), 4 deletions(-)

(limited to 'packages')

diff --git a/packages/lightsquid/lightsquid.inc b/packages/lightsquid/lightsquid.inc
index 6ae3de79..de06bbf0 100644
--- a/packages/lightsquid/lightsquid.inc
+++ b/packages/lightsquid/lightsquid.inc
@@ -103,7 +103,12 @@ function lightsquid_install() {
          if (file_exists($lstpl_file)) {
               mwexec("tar zxvf $lstpl_file -C " . LS_TEMPLATEPATH);
               update_log("lightsquid_install: Install templates from $lstpl_file");
-         }
+         }         
+         
+         # check perl
+         if (!file_exists("/usr/bin/perl")) 
+              mwexec("ln -s /usr/local/bin/perl /usr/bin/perl");
+         
          update_log("lightsquid_install: stopped");
 }
 
@@ -116,8 +121,8 @@ function lightsquid_deinstall() {
          // control shoot to head :)
 #         mwexec(CMD_PKGDELETE);
          // remove '/usr/local/www/lightsquid' dir - any time can't be removed by templates
-         if (file_exists(LS_WWWPATH))
-             mwexec("rm -rf " . LS_WWWPATH);
+#         if (file_exists(LS_WWWPATH))
+#             mwexec("rm -rf " . LS_WWWPATH);
 
          update_log("lightsquid_deinstall: stopped");
 }
@@ -127,6 +132,10 @@ function lightsquid_resync() {
         $tm = '';
         $tm_squid = '';
 
+        # check perl
+        if (!file_exists("/usr/bin/perl")) 
+            mwexec("ln -s /usr/local/bin/perl /usr/bin/perl");
+
         // debug
         $light_test = array();
         if (($_POST['Submit'] === 'Save') or !isset($_POST['Submit'])) {
diff --git a/packages/lightsquid/lightsquid.xml b/packages/lightsquid/lightsquid.xml
index 38704a4b..5f4293bf 100644
--- a/packages/lightsquid/lightsquid.xml
+++ b/packages/lightsquid/lightsquid.xml
@@ -248,7 +248,7 @@
             		lightsquid_resync();
        </custom_php_install_command>
        <custom_php_deinstall_command>                
-            		mwexec("pkg_delete lightsquid-1.7.1");       
+#            		mwexec("pkg_delete lightsquid-1.7.1");       
             		lightsquid_deinstall();
        </custom_php_deinstall_command>
 </packagegui>
\ No newline at end of file
-- 
cgit v1.2.3