Move qt1() to lib.common

Signed-off-by: Tom Eastep <teastep@shorewall.net>

Shorewall/Perl/prog.header

@@ -80,17 +80,6 @@ progress_message3() # $* = Message
     fi
 }
 
-qt1()
-{
-    local status
-
-    while [ 1 ]; do
-	"$@" >/dev/null 2>&1
-	status=$?
-	[ $status -ne 4 ] && return $status
-    done
-}
-
 #
 # Set a standard chain's policy
 #

Shorewall/Perl/prog.header6

@@ -80,17 +80,6 @@ progress_message3() # $* = Message
     fi
 }
 
-qt1()
-{
-    local status
-
-    while [ 1 ]; do
-	"$@" >/dev/null 2>&1
-	status=$?
-	[ $status -ne 4 ] && return $status
-    done
-}
-
 #
 # Set a standard chain's policy
 #

Shorewall/lib.common

@@ -153,6 +153,17 @@ qt()
     "$@" >/dev/null 2>&1
 }
 
+qt1()
+{
+    local status
+
+    while [ 1 ]; do
+	"$@" >/dev/null 2>&1
+	status=$?
+	[ $status -ne 4 ] && return $status
+    done
+}
+
 #
 # Determine if Shorewall is "running"
 #

Shorewall6/lib.common

@@ -175,6 +175,17 @@ qt()
     "$@" >/dev/null 2>&1
 }
 
+qt1()
+{
+    local status
+
+    while [ 1 ]; do
+	"$@" >/dev/null 2>&1
+	status=$?
+	[ $status -ne 4 ] && return $status
+    done
+}
+
 #
 # Determine if Shorewall is "running"
 #