# $Id$ # Main page of 'My::Project::surprise' # Copyright (C) 2003-2005 Jan Kratochvil # # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; exactly version 2 of June 1991 is required # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program; if not, write to the Free Software # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA package project::surprise::Index; require 5.6.0; # at least 'use warnings;' but we need some 5.6.0+ modules anyway 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; Wuse 'project::Lib'; our @ListItem=( "name"=>"Partition Surprise", "platform"=>"unixuser", "priority"=>650, "icon"=>"surprise-gnome-0-icon.png", "download-Page on SourceForge.net"=>"http://sourceforge.net/project/showfiles.php?group_id=10546", "download-ISO Image from SourceForge.net"=>"http://surprise.sourceforge.net/download/surprise-rel7.iso.zip", "link-Homepage on SourceForge.net"=>"http://surprise.sourceforge.net/", "link-Project Page on SourceForge.net"=>"http://sourceforge.net/projects/surprise/", "link-User Documentation"=>"http://surprise.sourceforge.net/doc/user.html", "link-Developer Documentation"=>"http://surprise.sourceforge.net/doc/tech.html", "summary"=>"GPLed Partition Magic clone", "license"=>"GPL", "sponsorship"=>sub { return a_href('http://www.suse.com/','SuSE'); }, "maintenance"=>"update", "ownership"=>sub { return <<"HERE"; }, Member of the development team: HERE "language"=>"C", "description"=><<"HERE",

Partition Surprise is a GPL partition managing software for GNU/Linux. Partition resizes, moves and conversions is implemented. Limited support of operations on mounted ext2-filesystem included as well.

HERE ); sub handler { project::Lib->init(); print <<"HERE";

This project is no longer maintained for many years. Even some data corruption has been reported. Please use @{[ a_href 'http://www.gnu.org/software/parted/parted.html','GNU Parted' ]} or similar products.

@{[ centerimg "surprise-gnome-0.png","Gnome client" ]} HERE exit; } 1;