summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorCranix <you@example.com>2013-03-19 18:09:23 -0400
committerCranix <you@example.com>2013-03-19 18:09:23 -0400
commit73fe8279e6beb35c7f16c45eb776dcb1ceb11d63 (patch)
tree16be1a2b784122e25200185b173543980b418b11
parent63e588f3882eb421a015de10c401773ff9021c53 (diff)
downloadBiblioteka-73fe8279e6beb35c7f16c45eb776dcb1ceb11d63.tar.gz
Biblioteka-73fe8279e6beb35c7f16c45eb776dcb1ceb11d63.tar.bz2
Biblioteka-73fe8279e6beb35c7f16c45eb776dcb1ceb11d63.tar.xz
Biblioteka-73fe8279e6beb35c7f16c45eb776dcb1ceb11d63.zip
Zmiana nazwy template'u na coś mówiącą, usunięcie kilku śmieci w katalogu views.
-rwxr-xr-xbin/app.pl2
-rw-r--r--views/a.tt35
-rw-r--r--views/a.tt.backup25
-rw-r--r--views/a.tt.backup112
-rw-r--r--views/b.tt10
-rw-r--r--views/c.tt6
-rw-r--r--views/ksiazki.db0
-rw-r--r--views/q.tt7
8 files changed, 1 insertions, 96 deletions
diff --git a/bin/app.pl b/bin/app.pl
index fbe6fdc..1c56ec0 100755
--- a/bin/app.pl
+++ b/bin/app.pl
@@ -24,7 +24,7 @@ get '/' => sub
# |kolejne rekordy|kolejne pola rekordow
#return ${$result[2]}[4];
- template 'a.tt',
+ template 'main_page.tt',
{
'table' => \@result
}
diff --git a/views/a.tt b/views/a.tt
deleted file mode 100644
index 6b45fac..0000000
--- a/views/a.tt
+++ /dev/null
@@ -1,35 +0,0 @@
-<html>
- <body>
- % (my @tab) = @{$_[0]->{'table'}};
-
- <table border=7>
- <tr><td>id</td><td>isbn</td><td>tytul</td><td>autor</td><td>wlasiciciel</td><td>jest?</td><td>mozna brac?</td></tr>
- <tr>
-
- % for (my $i=0;$i<$#tab+1;$i++)
- % {
- % for (my $ii=0;$ii<7;$ii++) #Jest 7 pol w kazdym rekordzie
- % {
-
- % if ($ii==5 || $ii==6)
- % {
- % if ($tab[$i][$ii]==1)
- % {
- % $tab[$i][$ii] = 'Tak';
- % }
- % else
- % {
- % $tab[$i][$ii] = 'Nie';
- % }
- % }
- <td> <%= $tab[$i][$ii] %> </td>
- % }
- %= "\n"
- </tr>
- <tr>
- % }
-
- </table>
-
- </body>
-</html>
diff --git a/views/a.tt.backup b/views/a.tt.backup
deleted file mode 100644
index bfc8433..0000000
--- a/views/a.tt.backup
+++ /dev/null
@@ -1,25 +0,0 @@
-<html>
- <body>
- % (my @tab) = @{$_[0]->{'table'}};
- % my $max_index = $#tab;
- % my @pool_names = ('id','isbn', 'tytul', 'autor', 'wlasciciel', 'jest?', 'mozna brac?');
-
- <table border=7>
- <tr>id<td>isbn<td>tytul<td>autor<td>wlasiciciel<td>jest?<td>mozna brac?
- <tr>
- % for (my $i=0;$i<$max_index;$i++)
- % {
- % for (my $ii=0;$ii<7;$ii++) #Jest 7 pol w kazdym rekordzie
- % {
- %# = $pool_names[$ii].':'.$tab[$i][$ii]
- %# <tr> <%= $pool_names[$ii] %> <td> <%= $tab[$i][$ii] %>
- <td> <%= $tab[$i][$ii] %>
- % }
- %= "\n"
- <tr>
- % }
-
- </table>
-
- </body>
-</html>
diff --git a/views/a.tt.backup1 b/views/a.tt.backup1
deleted file mode 100644
index 44f9a38..0000000
--- a/views/a.tt.backup1
+++ /dev/null
@@ -1,12 +0,0 @@
-<html>
- <body>
- % my ($x) = @_;
- % my @tab = $x->{'table'};
-
- %# my $max_index = $#tab;
- %# for (my $i=0;$i<$max_index;$i++)
- %# {
- %= $tab[0][1][3]
- %# }
- </body>
-</html>
diff --git a/views/b.tt b/views/b.tt
deleted file mode 100644
index 92ace34..0000000
--- a/views/b.tt
+++ /dev/null
@@ -1,10 +0,0 @@
-<html>
- <body>
- <table>
- <table border=7>
- <tr>
- <td> <%=5*5%> </td>
- </tr>
- </table>
- </body>
-</html>
diff --git a/views/c.tt b/views/c.tt
deleted file mode 100644
index d93cbce..0000000
--- a/views/c.tt
+++ /dev/null
@@ -1,6 +0,0 @@
-<html>
- <body>
- %my ($x) = @_;
- %= $x->{'number'};
- </body>
-</html>
diff --git a/views/ksiazki.db b/views/ksiazki.db
deleted file mode 100644
index e69de29..0000000
--- a/views/ksiazki.db
+++ /dev/null
diff --git a/views/q.tt b/views/q.tt
deleted file mode 100644
index 7af7630..0000000
--- a/views/q.tt
+++ /dev/null
@@ -1,7 +0,0 @@
-<html>
- <body>
- % my ($x) = @_;
- % my @tab = $x->{'tablica'};
- %= ${$tab[0]}[0]
- </body>
-</html>