#!/bin/sh  
# \
  exec oagtclsh "$0" "$@"

# $Log: not supported by cvs2svn $
# Revision 1.1  2004/07/23 14:39:25  shang
# modifed /home/helios/OAG/bin/setFACL-oagOnly to call the libary setfacl proc -
# APSSetFACL, first version
#

#set facl to default
set CVSRevisionAuthor "\$Revision: 1.2 $ \$Author: shang $"

set auto_path [linsert $auto_path 0  /usr/local/oag/apps/lib/$env(HOST_ARCH)]
set auto_path [linsert $auto_path 0 /usr/local/oag/lib_patch/$env(HOST_ARCH)]
APSStandardSetup

set usage "usage: setFACL-oagOnly <filename> ..."
if ![llength $argv] {
    puts stderr "$usage"
    exit
}
foreach item $argv {
    if ![file exists $item] {
        puts stderr "$item not found"
        exit
    }
}

if [catch {APSSetFACL -filenameList $argv} result] {
    puts stderr $result
    exit
}

exit

