From 4f18218ece43f5459c007bc5e56e76fb4a212576 Mon Sep 17 00:00:00 2001 From: ziggi Date: Mon, 11 Dec 2017 19:08:29 +0000 Subject: [PATCH] --- templs/forward-add-form.html.ep | 30 ----------- templs/forward-add-handler.html.ep | 32 ------------ templs/forward-delete-form.html.ep | 39 -------------- templs/forward-delete-handler.html.ep | 32 ------------ templs/forward-list.html.ep | 74 --------------------------- templs/forward-update-form.html.ep | 44 ---------------- templs/forward-update-handler.html.ep | 41 --------------- 7 files changed, 292 deletions(-) delete mode 100644 templs/forward-add-form.html.ep delete mode 100644 templs/forward-add-handler.html.ep delete mode 100644 templs/forward-delete-form.html.ep delete mode 100644 templs/forward-delete-handler.html.ep delete mode 100644 templs/forward-list.html.ep delete mode 100644 templs/forward-update-form.html.ep delete mode 100644 templs/forward-update-handler.html.ep diff --git a/templs/forward-add-form.html.ep b/templs/forward-add-form.html.ep deleted file mode 100644 index 2612be8..0000000 --- a/templs/forward-add-form.html.ep +++ /dev/null @@ -1,30 +0,0 @@ -%# -%# $Id$ -%# -% layout 'default'; -% title 'Maacom'; - -% use Mojo::Util qw(dumper); - -% my $u = $c->app->user; - -
-
-
- -
-
Add forwarded domain
- -
- - Escape -
-
- -
-
-
-%#EOF diff --git a/templs/forward-add-handler.html.ep b/templs/forward-add-handler.html.ep deleted file mode 100644 index 7ed9054..0000000 --- a/templs/forward-add-handler.html.ep +++ /dev/null @@ -1,32 +0,0 @@ -%# -%# $Id$ -%# -% layout 'default'; -% title 'Maacom'; - -% use Mojo::Util qw(dumper); - -% my $u = $c->app->user; -% my $name = $c->req->param('forward_name'); -% my $id = $u->forward_exist($name); - -% if ($id) { -
Domain <%= $name %> already exists
-% } - -% unless ($id) { - % my $res = $u->forward_add($name); - % if ($res) { -
Domain <%= $name %> has been added.
- % } - - % unless ($res) { -
Domain <%= $name %> was not added.
- % } -% } - -%#EOF - - - - diff --git a/templs/forward-delete-form.html.ep b/templs/forward-delete-form.html.ep deleted file mode 100644 index 32256cb..0000000 --- a/templs/forward-delete-form.html.ep +++ /dev/null @@ -1,39 +0,0 @@ -%# -%# $Id$ -%# -% layout 'default'; -% title 'Maacom'; - -% use Mojo::Util qw(dumper); - -% my $u = $c->app->user; - -% my $forward_id = $c->req->param('forward_id') || 0; -% my $profile = $u->forward_profile($forward_id); - -% if ($profile) { - % my $forward_name = $profile->{name}; - -
-
-
- -
-
Delete domain <%= $forward_name %>
- -
- - Escape -
-
- -
-
-
-% } - -% unless ($profile) { -
Domain with id <%= $forward_id %> not exist
-% } - -%#EOF diff --git a/templs/forward-delete-handler.html.ep b/templs/forward-delete-handler.html.ep deleted file mode 100644 index 1b21144..0000000 --- a/templs/forward-delete-handler.html.ep +++ /dev/null @@ -1,32 +0,0 @@ -%# -%# $Id$ -%# -% layout 'default'; -% title 'Maacom'; - -% use Mojo::Util qw(dumper); - -% my $u = $c->app->user; - -% my $forward_id = $c->req->param('forward_id') || 0; -% my $profile = $u->forward_profile($forward_id); - -% if ($profile) { - % my $name = $profile->{name}; - % my $res = $u->forward_delete($forward_id); - - % if ($res) { -
Domain <%= $name %> has been deleted
- % } - - % unless ($res) { -
Domain <%= $name %> was not deleted
- % } -% } - -% unless ($profile) { -
Domain with id <%= $forward_id %> not exist
-% } - -%#EOF - diff --git a/templs/forward-list.html.ep b/templs/forward-list.html.ep deleted file mode 100644 index 31c378c..0000000 --- a/templs/forward-list.html.ep +++ /dev/null @@ -1,74 +0,0 @@ -%# -%# $Id$ -%# -% layout 'default'; -% title 'Maacom'; - -% use Mojo::Util qw(dumper); - -% my $u = $c->app->user; - -
- Domains - - - -
- - -% my $list = $u->forward_list; - -% unless ($list) { -
- Cannot list domains. May be wrong database? -
-% } - - - - - - - - - - - -% my $n = 0; - -% if ($list) { - % foreach my $row (@$list) { - % $n += 1; - % my $id = $row->{id}; - % my $name = $row->{name}; - % my $size = $row->{size}; - - - - - - - % } -% } - -
#domain
<%= $n %><%= $name %>
- - - -%# EOF diff --git a/templs/forward-update-form.html.ep b/templs/forward-update-form.html.ep deleted file mode 100644 index 9534f44..0000000 --- a/templs/forward-update-form.html.ep +++ /dev/null @@ -1,44 +0,0 @@ -%# -%# $Id$ -%# -% layout 'default'; -% title 'Maacom'; - -% use Mojo::Util qw(dumper); - -% my $u = $c->app->user; - -% my $forward_id = $c->req->param('forward_id') || 0; -% my $profile = $u->forward_profile($forward_id); - -% if ($profile) { - % my $forward_name = $profile->{name}; - -
-
-
- -
-
Edit domain
- - -
- - Escape -
-
- -
-
-
-% } - -% unless ($profile) { -
Domain with id <%= $forward_id %> not exist
-% } - - -%#EOF diff --git a/templs/forward-update-handler.html.ep b/templs/forward-update-handler.html.ep deleted file mode 100644 index 3eba72a..0000000 --- a/templs/forward-update-handler.html.ep +++ /dev/null @@ -1,41 +0,0 @@ -%# -%# $Id$ -%# -% layout 'default'; -% title 'Maacom'; - -% use Mojo::Util qw(dumper); - -% my $u = $c->app->user; - -% my $name = $c->req->param('forward_name'); -% my $forward_id = $c->req->param('forward_id') || 0; -% my $profile = $u->forward_profile($forward_id); - -% if ($profile) { - % my $cid = $u->forward_exist($name); - % if ($cid) { -
Domain <%= $name %> already exists
- % } - - % unless ($cid) { - % my $res = $u->forward_update($forward_id, name => $name); - % if ($res) { -
Domain <%= $name %> has been updated.
- % } - - % unless ($res) { -
Domain <%= $name %> was not updated.
- % } - % } -% } - -% unless ($profile) { -
Domain with id <%= $forward_id %> not exist
-% } - -%#EOF - - - -