|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T f
Length: 654 (0x28e) Types: TextFile Names: »filexp«
└─⟦060c9c824⟧ Bits:30007080 DKUUG TeX 2/12/89 └─⟦this⟧ »./tex82/TeXpatches/patch/filexp« └─⟦9ae75bfbd⟧ Bits:30007242 EUUGD3: Starter Kit └─⟦91a96b8ca⟧ »EurOpenD3/utils/patch.tar.Z« └─⟦17c387d66⟧ └─⟦this⟧ »filexp« └─⟦9ae75bfbd⟧ Bits:30007242 EUUGD3: Starter Kit └─⟦3658e588a⟧ »EurOpenD3/mail/mh/mh-6.7.tar.Z« └─⟦c75e36ecb⟧ └─⟦this⟧ »mh-6.7/miscellany/patch-2.0.12/filexp« └─⟦52210d11f⟧ Bits:30007239 EUUGD2: TeX 3 1992-12 └─⟦e0344c422⟧ »unix3.0/patch.tar.Z« └─⟦da0377df4⟧ └─⟦this⟧ »patch/filexp«
#!/bin/sh : expand filename case "$1" in ~/*|~) /bin/echo $1 | /bin/sed "s|~|${HOME-$LOGDIR}|" ;; ~*) if /bin/test -f /bin/csh; then /bin/csh -f -c "glob $1" /bin/echo "" else name=`/bin/expr x$1 : '..\([^/]*\)'` dir=`/bin/sed </etc/passwd -n -e "/^${name}:/{s/^[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:\([^:]*\).*"'$'"/\1/" -e p -e q -e '}'` if /bin/test ! -d "$dir"; then me=`basename $0` /bin/echo "$me: can't locate home directory for: $name" >&2 exit 1 fi case "$1" in */*) /bin/echo $dir/`/bin/expr x$1 : '..[^/]*/\(.*\)'` ;; *) /bin/echo $dir ;; esac fi ;; *) /bin/echo $1 ;; esac