#!/usr/local/bin/xotclsh 
# $Id: xo-whichPkg,v 1.1.1.1 2004/05/23 22:50:39 neumann Exp $
package require XOTcl; namespace import -force xotcl::*

@ @File {
    description {
      A small sample script to show which package is loaded from where
      when a target package is loaded. <@p>
      Usage: "xo-whichPkg -pkg PACKAGENAME"
    }
    authors {
      Fredj Dridi dridi@nestroy.wi-inf.uni-essen.de
    }
    date "[::xotcl::rcs date {$Date: 2004/05/23 22:50:39 $}]"
}

array set opts {
  -pkg xotcl::comm::httpd
}
array set opts $argv

package require xotcl::package
package verbose 1
puts stderr [package require $opts(-pkg)]