fai/classes/S*.source executable check bugfix

[Devlin]

Follows a patch to allow running of .source files in fai/classes that 
are not marked as executables.

--- subroutines.orig    Mon Jun 24 15:49:18 2002
+++ subroutines Mon Jun 24 16:03:51 2002
@@ -382,7 +382,8 @@

      # alphabetical sort is important
      for f in `ls S[0-9]*.{sh,pl,source}` ; do
-       if [ -x $f -a -f $f ]; then
+       t=`echo $f | grep '\.class$'`
+       if [ -x $f -a -f $f -o -f $f -a ! -z $t ]; then
         [ "$verbose" ] && echo "Executing $f"
         case $f in
             *.pl) newclasses=`perl $f </dev/null | grep -v '^#'` ;;