Add some free icons, based on the Silk set, to draw the tree.

diff --git a/itkacl-web-1.0/include/itkaclcommon.pm b/itkacl-web-1.0/include/itkaclcommon.pm
index 36eb89014701935a70293ef93f40e4192906d2f3..07ba68248c5d9d7a3da582fa0584c5bcccf13257 100644 (file)
--- a/itkacl-web-1.0/include/itkaclcommon.pm
+++ b/itkacl-web-1.0/include/itkaclcommon.pm
@@ -150,9 +150,9 @@ sub print_tree_element {
                # Stuff to the left of folder
                for my $i (1..$level) {
                        if ($vbars->[$i - 1]) {
-                               print '<img src="/img/verticalbar.png" alt="|" width="18" height="18" />';
+                               print '<img src="/img/verticalbar.png" alt="|" width="16" height="18" />';
                        } else {
-                               print '<img src="/img/whitespace.png" alt="&nbsp;" width="18" height="18" />';
+                               print '<img src="/img/whitespace.png" alt="&nbsp;" width="16" height="18" />';
                        }
                }
 
@@ -160,9 +160,9 @@ sub print_tree_element {
                my $countref = $dbh->selectrow_hashref('SELECT COUNT(*) AS num FROM objects WHERE parent=?', undef, $ref->[0]);
                if ($countref->{'num'} == 0) {
                        if ($i == $count) {
-                               print "<img src=\"/img/folder-nochildren.png\" alt=\"\" width=\"39\" height=\"18\" />";
+                               print "<img src=\"/img/folder-nochildren.png\" alt=\"\" width=\"37\" height=\"18\" />";
                        } else {
-                               print "<img src=\"/img/folder-nochildren-moresiblings.png\" alt=\"|\" width=\"39\" height=\"18\" />";
+                               print "<img src=\"/img/folder-nochildren-moresiblings.png\" alt=\"|\" width=\"37\" height=\"18\" />";
                        }
                } else {
                        my $url = $cgi->url(-absolute=>1) . "?";
@@ -177,9 +177,9 @@ sub print_tree_element {
                        }
                                                         
                        if (defined($session{$ref->[0]})) {
-                               print "<a href=\"${url}close=$ref->[0]\"><img src=\"/img/folder-open$msb.png\" alt=\"-\" width=\"39\" height=\"18\" /></a>";
+                               print "<a href=\"${url}close=$ref->[0]\"><img src=\"/img/folder-open$msb.png\" alt=\"-\" width=\"37\" height=\"18\" /></a>";
                        } else {
-                               print "<a href=\"${url}open=$ref->[0]\"><img src=\"/img/folder-closed$msb.png\" alt=\"+\" width=\"39\" height=\"18\" /></a>";
+                               print "<a href=\"${url}open=$ref->[0]\"><img src=\"/img/folder-closed$msb.png\" alt=\"+\" width=\"37\" height=\"18\" /></a>";
                        }
                }
 

diff --git a/itkacl-web-1.0/web/img/base-folder.png b/itkacl-web-1.0/web/img/base-folder.png
new file mode 100644 (file)
index 0000000..bac2ca0
Binary files /dev/null and b/itkacl-web-1.0/web/img/base-folder.png differ

diff --git a/itkacl-web-1.0/web/img/folder-closed-moresiblings.png b/itkacl-web-1.0/web/img/folder-closed-moresiblings.png
new file mode 100644 (file)
index 0000000..3165047
Binary files /dev/null and b/itkacl-web-1.0/web/img/folder-closed-moresiblings.png differ

diff --git a/itkacl-web-1.0/web/img/folder-closed.png b/itkacl-web-1.0/web/img/folder-closed.png
new file mode 100644 (file)
index 0000000..2e9a038
Binary files /dev/null and b/itkacl-web-1.0/web/img/folder-closed.png differ

diff --git a/itkacl-web-1.0/web/img/folder-nochildren-moresiblings.png b/itkacl-web-1.0/web/img/folder-nochildren-moresiblings.png
new file mode 100644 (file)
index 0000000..7f50faf
Binary files /dev/null and b/itkacl-web-1.0/web/img/folder-nochildren-moresiblings.png differ

diff --git a/itkacl-web-1.0/web/img/folder-nochildren.png b/itkacl-web-1.0/web/img/folder-nochildren.png
new file mode 100644 (file)
index 0000000..5246f78
Binary files /dev/null and b/itkacl-web-1.0/web/img/folder-nochildren.png differ

diff --git a/itkacl-web-1.0/web/img/folder-open-moresiblings.png b/itkacl-web-1.0/web/img/folder-open-moresiblings.png
new file mode 100644 (file)
index 0000000..fae83a9
Binary files /dev/null and b/itkacl-web-1.0/web/img/folder-open-moresiblings.png differ

diff --git a/itkacl-web-1.0/web/img/folder-open.png b/itkacl-web-1.0/web/img/folder-open.png
new file mode 100644 (file)
index 0000000..5acf279
Binary files /dev/null and b/itkacl-web-1.0/web/img/folder-open.png differ

diff --git a/itkacl-web-1.0/web/img/verticalbar.png b/itkacl-web-1.0/web/img/verticalbar.png
new file mode 100644 (file)
index 0000000..e2cf7a1
Binary files /dev/null and b/itkacl-web-1.0/web/img/verticalbar.png differ

diff --git a/itkacl-web-1.0/web/img/whitespace.png b/itkacl-web-1.0/web/img/whitespace.png
new file mode 100644 (file)
index 0000000..056cc1a
Binary files /dev/null and b/itkacl-web-1.0/web/img/whitespace.png differ