From 0a8e85ff66e30694a0583614f0ae90c36e8d44f6 Mon Sep 17 00:00:00 2001
From: Daniel Baumann <daniel@debian.org>
Date: Sun, 23 Sep 2007 14:46:27 +0200
Subject: Adding casper 1.77+debian-4.

---
 scripts/casper-functions | 21 +++++++++++++++++----
 1 file changed, 17 insertions(+), 4 deletions(-)

(limited to 'scripts/casper-functions')

diff --git a/scripts/casper-functions b/scripts/casper-functions
index 9e36db7..2603eba 100644
--- a/scripts/casper-functions
+++ b/scripts/casper-functions
@@ -1,12 +1,25 @@
 
 . /scripts/functions
+. /casper.vars
 
 # Override this so we don't call PROGRESS
 log_end_msg()
 {
-	if [ -x /sbin/usplash_write ]; then
-		/sbin/usplash_write "SUCCESS ok"
-	fi
-	_log_msg "Done."
+    if [ -x /sbin/usplash_write ]; then
+        /sbin/usplash_write "SUCCESS ok"
+    fi
+    _log_msg "Done."
 }
 
+really_export ()
+{
+    STRING="${1}"
+    VALUE="$(eval echo -n \${$STRING})"
+
+    if [ -f /casper.vars ] && cat /casper.vars | grep -sq "export ${STRING}" ; then
+        sed -i -e 's/\('${STRING}'=\).*$/\1'${VALUE}'/' /casper.vars
+    else
+        echo "export ${STRING}=\"${VALUE}\"" >> /casper.vars
+    fi
+    eval export "${STRING}"="${VALUE}"
+}
\ No newline at end of file
-- 
cgit v1.2.3