From 1ebd44d948f63e0f6d5d005bb5ced02c5041414e Mon Sep 17 00:00:00 2001 From: lace <> Date: Sun, 23 Dec 2007 11:11:05 +0000 Subject: [PATCH] Commercial products have been discontinued. --- product/hotelgate/Index.pm | 18 +---- product/hotelgate/Lib.pm | 1 - product/hotelgate/Makefile.am | 7 +- product/hotelgate/Order.css | 21 ------ product/hotelgate/Order.js | 70 ------------------ product/hotelgate/Order.pm | 135 ---------------------------------- product/hotelgate/OrderSubmit.pm | 102 ------------------------- product/hotelgate/hotelsevendays.jpeg | Bin 30090 -> 0 bytes product/mms2/Index.pm | 3 + 9 files changed, 7 insertions(+), 350 deletions(-) delete mode 100644 product/hotelgate/Order.css delete mode 100644 product/hotelgate/Order.js delete mode 100644 product/hotelgate/Order.pm delete mode 100644 product/hotelgate/OrderSubmit.pm delete mode 100644 product/hotelgate/hotelsevendays.jpeg diff --git a/product/hotelgate/Index.pm b/product/hotelgate/Index.pm index 7a772ce..041bc5f 100644 --- a/product/hotelgate/Index.pm +++ b/product/hotelgate/Index.pm @@ -32,6 +32,7 @@ our @ListItem=( "icon"=>"Admin-Login-icon.jpeg", "summary"=>"Internet Public Access Gateway", "description"=><<"HERE", +
This product is no longer maintained.
User-friendly Internet access gateway providing separate rooms / areas access control with a single central administration point.
HERE @@ -47,6 +48,8 @@ my $ListItem=product::Lib->name_to_hashref("hotelgate"); print <<"HERE";This product is no longer maintained.
HERE print rightimg <<"HERE","./rack-1u.jpeg","Rack mountable 1U cased"; @@ -78,21 +81,6 @@ print <<"HERE"; HERE -sub hotel_href($) -{ -my($content)=@_; - - return a_href_cc {""=>'http://www.hotelsevendays.com/', - "CZ"=>'http://www.hotelsevendays.cz/', - "RU"=>'http://www.hotelsevendays.ru/'},$content; -} - -print rightimg <<"HERE",hotel_href(img 'hotelsevendays.jpeg','Hotel Seven Days photo'); -The initial pilot deployment of this gateway is running since 2004 in -@{[ hotel_href 'Hotel Seven Days' ]}.
-HERE - exit; } diff --git a/product/hotelgate/Lib.pm b/product/hotelgate/Lib.pm index 552217b..af72a5d 100644 --- a/product/hotelgate/Lib.pm +++ b/product/hotelgate/Lib.pm @@ -56,7 +56,6 @@ my($class,%args)=@_; "Case"=>"Deployment", "Screenshot"=>"Screenshots", "Spec"=>"Specification", - "Order"=>"Order", ); while (@sections) { my $section_path=shift @sections; diff --git a/product/hotelgate/Makefile.am b/product/hotelgate/Makefile.am index 8a2499a..f6e8d3d 100644 --- a/product/hotelgate/Makefile.am +++ b/product/hotelgate/Makefile.am @@ -26,17 +26,12 @@ EXTRA_DIST+= \ cafe.svg \ rooms.svg \ Lib.pm \ - Order.css \ - Order.js \ - rack-1u.jpeg \ - hotelsevendays.jpeg + rack-1u.jpeg MODPERL_PM+= \ Index.pm \ Case.pm \ Spec.pm \ - Order.pm \ - OrderSubmit.pm \ Screenshot.pm full_svg_DPI=30 diff --git a/product/hotelgate/Order.css b/product/hotelgate/Order.css deleted file mode 100644 index d877fb9..0000000 --- a/product/hotelgate/Order.css +++ /dev/null @@ -1,21 +0,0 @@ -/* $Id$ - * CSS of HotelGate ordering - * Copyright (C) 2005 Jan KratochvilPrice offer will be provided according to your order specification. -You may also contact us directly at the e-mail address: -@{[ a_href 'mailto:hotelgate@jankratochvil.net' ]}
-HERE - -if (my $error=$W->{"args"}{"error"}) { - print <<"HERE"; -@{[ $error{$error} ]}
-HERE - } - -print <<"HERE"; - -HERE - - -exit; -} -1; diff --git a/product/hotelgate/OrderSubmit.pm b/product/hotelgate/OrderSubmit.pm deleted file mode 100644 index f68908e..0000000 --- a/product/hotelgate/OrderSubmit.pm +++ /dev/null @@ -1,102 +0,0 @@ -# $Id$ -# Ordering form processor of 'My::Project::hotelgate' -# Copyright (C) 2005 Jan KratochvilSVlPAwdf_MRFx^F&`Hxh This product is no longer maintained. You can use MMS messages for a price slightly higher than regular SMS
message, depending on the GPRS data price plans of your country.
Service is suitable to coexist with existing GSM networks MMS services. This product is no longer maintained. Currently supported client mobile phones of the country: Czech Republic
zGl~&cn{ymTdmP7Q@0n*8FV6vGq~J_TJYpBm^;r4)JHB}1SPDY!e&tHh_c>Ars8kJk
z4lQ%0(hq(uo>bM4l8Poh-MQJ3>%|M3GFo17DsEAK0s{QWz`ZXYQvq{|YTvwSPOjZ&
z_;370#jT{lzKupifnEvyU&oX@{[ product::Lib->title($ListItem) ]}
+
@{[
--
1.8.3.1