X-Git-Url: http://git.jankratochvil.net/?a=blobdiff_plain;f=project%2Fdoswatch%2FListItem.pm;h=e4796c97340c50fa0c0c2f6533c72cbc549769d2;hb=edd751ab0449b6117afdd9c496af762008c40351;hp=7b55e2180a43253edc45a2e1f3966ea487aea20e;hpb=023bd9615484000eec756de502600995e7b75fe8;p=www.jankratochvil.net.git diff --git a/project/doswatch/ListItem.pm b/project/doswatch/ListItem.pm index 7b55e21..e4796c9 100755 --- a/project/doswatch/ListItem.pm +++ b/project/doswatch/ListItem.pm @@ -18,31 +18,36 @@ # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA -package My::Project::doswatch; +package project::doswatch::ListItem; require 5.6.0; # at least 'use warnings;' but we need some 5.6.0+ modules anyway -use vars qw($VERSION $CVS_ID); -$VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; }; -$CVS_ID=q$Id$; +our $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; }; +our $CVS_ID=q$Id$; use strict; use warnings; +use My::Web; -our %ListItem=( - "name"=>"DOSWatcher - DOS File Access Snooper", + +our @ListItem=( + "name"=>"DOSWatcher", + "platform"=>"dos", + "priority"=>390, "download"=>"doswatch.zip", - "summary"=>"DOS files snooper", + "summary"=>"DOS files access strace(1) equivalent", "license"=>"PD", - "maintenance"=>"finished", + "maintenance"=>"ready", "language"=>"i386 asm", - "description"=>"" - .'

Resident program which displays all the file (and other) DOS function' - .' calls access on the secondary console. Useful for many failure discoveries' - .' for weird software packages with broken file/directory access.

' - .' ' + "description"=><<"HERE", +

Resident program which displays all the file (and other) DOS function +calls access on the secondary console. Useful for many failure discoveries +for weird software packages with broken file/directory access.

+ +HERE ); 1;