X-Git-Url: http://git.jankratochvil.net/?p=www.jankratochvil.net.git;a=blobdiff_plain;f=project%2Fcaptive%2FIndex.html.pl;h=8ff22219937cca831890df76f5e71ae692b868ea;hp=b0ba35319d35d829e5c65cc0a68f1525347eb77c;hb=256707c6dd77597b15b156c5674e213601e8a163;hpb=28c4f5114c7eb4bbd2c2ba6b8f79335f0659b1ec
diff --git a/project/captive/Index.html.pl b/project/captive/Index.html.pl
index b0ba353..8ff2221 100755
--- a/project/captive/Index.html.pl
+++ b/project/captive/Index.html.pl
@@ -34,6 +34,7 @@ Wuse 'project::captive::ListItem';
my $W=My::Project->init_project(
"__PACKAGE__"=>__PACKAGE__,
"ListItem"=>\@project::captive::ListItem::ListItem,
+ "no_project_data"=>1,
"head_css"=>"
.reqpkg { font-style: italic; }
.stuff { font-style: italic; font-size: larger; margin-left: 20%; margin-right: 10%; }
@@ -46,14 +47,14 @@ print vskip("10ex")."
!!! DO NOT DISCLOSE !!!
\n".vskip(
print <<"HERE";
The First Read/Write NTFS for Free Operating Systems
-The First Free Microsoft Windows Kernel API Emulation
+The First Open Source MS-Windows Kernel API for Free OS
HERE
my @stuff=(
"A lot of people claim themselves as Windows Programmers.\n"
." Now I can finally join them - I also wrote my own Microsoft Windows.",
"Why do they need ".a_href('http://www.winsupersite.com/reviews/winserver2k3_gold2.asp','5000 developers')
- ." to write Microsoft Windows when it is just One Man Show task?",
+ ." to write Microsoft Windows when it can be just One Man Show?",
@@ -72,8 +73,10 @@ print <<"HERE";
@{[ map(" $_ \n",($stuff[int rand @stuff])) ]}
|
- @{[ a_href My::Web::img_src('captive-install-acquire'),
- img('captive-install-acquire-small','[ Captive Microsoft Windows Drivers Acquire Illustration ]') ]} |
+ @{[
+ img 'captive-install-acquire-small','[ Captive Microsoft Windows Drivers Acquire Illustration ]',
+ "a_href_img"=>'captive-install-acquire'
+ ]} |
@@ -95,8 +98,8 @@ my %reqpkg=(
3=>[qw(glib2 gnome-vfs2 ORBit2 libxml2 openssl popt readline)],
);
my %version=(
- map(($_=>["0.9.5","0"]),qw(captive captive-lufs captive-install)),
- "lufs"=>["0.9.6","1captive3"],
+ map(($_=>["0.9.6","0"]),qw(captive captive-lufs captive-install)),
+ "lufs"=>["0.9.6","1captive5"],
"gnome-vfs-httpcaptive"=>["2.3.8captive2","0"],
"ntfsprogs"=>["200309071734","1captive1"],
"ntfsprogs-gnomevfs"=>["1.0.1","0"],
@@ -294,7 +297,7 @@ class="quote">/usr/share/lufs/prepmod.
- The First Free Microsoft Windows Kernel API Emulation
+ The First Open Source MS-Windows Kernel API for Free OS
Compatibility with existing binary Microsoft Windows file system drivers was
reached. Microsoft Windows kernel system components required by these drivers
@@ -304,7 +307,7 @@ class="quote">/usr/share/lufs/prepmod.
@{[ a_href 'http://www.reactos.com/','ReactOS' ]}
code base made a big asset for this functionality.
|
- @{[ a_href 'http://www.reactos.com/',img('reactos','ReactOS') ]} |
+ @{[ img 'reactos','ReactOS',"a_href"=>'http://www.reactos.com/' ]} |
@@ -313,11 +316,12 @@ class="quote">/usr/share/lufs/prepmod.
See also
- - @{[ a_href 'Preview.html.pl','Technology Preview' ]}
+ - @{[ a_href 'Preview.html.pl','Technology Preview' ]}
+ - @{[ a_href 'CVS.html.pl','CVS Repository' ]}
- @{[ a_href 'doc/','Developer Documentation' ]}; highlights:
- @{[ a_href 'doc/About.html.pl#versions','Microsoft Windows Versions Compatibility' ]}
- @{[ a_href 'doc/Architecture.html.pl#law','Laws and Licensing Conditions' ]}
- - @{[ a_href 'doc/Details.html.pl#sandbox','Sandboxing of W32 filesystem' ]}
+ - @{[ a_href 'doc/Details.html.pl#sandbox','Sandboxing of W32 Filesystem' ]}
- @{[ a_href 'doc/TODO.html.pl#todo_fsck','TODO: Fsck of NTFS' ]}
- @{[ a_href 'doc/TODO.html.pl#todo_surprise','TODO: NTFS Support for Partition Surprise' ]}
- @{[ a_href 'doc/Related.html.pl#LinuxNTFScompet','Related Projects - Linux NTFS' ]}
@@ -355,7 +359,7 @@ class="quote">/usr/share/lufs/prepmod.
Why did I install Microsoft Windows and wrote such disgusting piece of code?
- Expecting @{[ a_href $W->{"resume_url"},"yet another challenging task" ]}, !
+ Expecting @{[ a_href $W->{"resume_url"},"yet another challenging task" ]}!
HERE