[vhffs-dev] [1787] Removed now unused methods. |
[ Thread Index |
Date Index
| More vhffs.org/vhffs-dev Archives
]
Revision: 1787
Author: beuss
Date: 2011-05-20 13:14:14 +0200 (Fri, 20 May 2011)
Log Message:
-----------
Removed now unused methods.
Modified Paths:
--------------
trunk/vhffs-api/src/Vhffs/Panel/Main.pm
Modified: trunk/vhffs-api/src/Vhffs/Panel/Main.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/Main.pm 2011-05-20 11:14:04 UTC (rev 1786)
+++ trunk/vhffs-api/src/Vhffs/Panel/Main.pm 2011-05-20 11:14:14 UTC (rev 1787)
@@ -742,72 +742,4 @@
exit(0);
}
-=pod
-
-=head2 create_service_index
-
- my $webs = Vhffs::Panel::Web::get_per_group($main, $gid);
- my $template = $panel->create_service_index('web', $webs);
- print $template->output;
-
-Generates summary information for a given service using service_index.tmpl.
-
-=cut
-
-sub create_service_index($$$) {
- my ($panel, $service, $services) = @_;
- my %service_labels = (
- cvs => 'CVS repositories',
- dns => 'Domain names',
- mail => 'Mail domains',
- mailinglist => 'Mailing lists',
- mysql => 'MySQL DBs',
- pgsql => 'PostgreSQL DBs',
- repository => 'Download repositories',
- svn => 'SVN repositories',
- git => 'Git repositories',
- mercurial => 'Mercurial repositories',
- bazaar => 'Bazaar repositories',
- web => 'Webareas',
- cron => 'Cron jobs',
- );
-
- my $vhffs = $panel->{'vhffs'};
- my $cgi = $panel->{'cgi'};
- my $templatedir = $panel->{templatedir};
-
- my $group = Vhffs::Group::get_by_groupname( $vhffs , $cgi->param('group') );
-
- my $svclabel = $service_labels{$service};
- my $template = new HTML::Template( filename => $templatedir.'/panel/misc/service_index.tmpl', global_vars => 1 );
-
- my $format = sprintf( '%s for %%s', $svclabel );
- $template->param( TEXT_TITLE => sprintf(gettext($format), $group->get_groupname) );
- $template->param( SERVICE => $service );
- $template->param( ADMIN_TEXT => gettext('Go to administration') );
- $template->param( RESUBMIT_TEXT => gettext('Propose a new description') );
- $template->param( DELETE_TEXT => gettext('Delete') );
- $template->param( HISTORY_TEXT => gettext('History') );
- $template->param( NEW => gettext('New') );
- $template->param( NO_SERVICE_TEXT => gettext('None') );
- $template->param( SERVICES => $services);
- $template->param( GROUPNAME => $group->get_groupname );
-
- my $serviceconfig = $vhffs->get_config->get_service($service);
- if( defined $serviceconfig && defined ( my $url = $serviceconfig->{'url_doc'} ) ) {
- $template->param( HELP_TEXT => gettext('Help') );
- $template->param( HELP_URL => $url );
- }
-
- return $template;
-}
-
-sub format_description($) {
- use CGI qw{escapeHTML};
- my $description = shift;
- $description = escapeHTML($description);
- $description =~ s!\n!<br/>!g;
- return $description;
-}
-
1;