Annotation of freem/contrib/%uflis.m, revision 1.1
1.1 ! snw 1: %uflis ; FreeM File List - version 0.5.0.1
! 2: ; A.Trocha ; 01/29/1999 01:47/GMT+1
! 3: ; $Source: /cvsroot-fuse/gump/FreeM/mlib/%uflis.m,v $
! 4: ; $Revision: 1.1 $ $Date: 2000/02/18 15:13:42 $
! 5: N exec,fn
! 6: ;
! 7: w !,$t(+1),!,$$^%uxdat
! 8: ;
! 9: query W !!,"Current Directory: ",$V(2)
! 10: W !!,"File Name: "
! 11: R fn I fn="" G end
! 12: W !!
! 13: S exec="!less "_fn
! 14: X exec
! 15: G query
! 16: end Q
! 17:
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>