diff --git a/MAC/APL/APLCommon/src/swlevel b/MAC/APL/APLCommon/src/swlevel
index 3e54a1b17093c0253548ef83bfbc95bcdfd806a3..cd8506460e03fd11fbbdbed5de599de5cd73ec3f 100755
--- a/MAC/APL/APLCommon/src/swlevel
+++ b/MAC/APL/APLCommon/src/swlevel
@@ -267,6 +267,14 @@ if [ -z "$1" ]; then
 	exit
 fi
 
+# argument s or -s only returns level, no list
+
+if [ "$1" = "s" -o "$1" = "-s" ]; then
+        level=`cat /tmp/level.admin`
+        echo $level
+        exit
+fi
+
 # don't allow root to run swlevel because all logfile get root access.
 user=`id | cut -d'(' -f2 | cut -d')' -f1`
 echo $user