smeserver-vacation/contribs7/smeserver-vacation-1.0-addListOfRepliedAdresses.patch

--- smeserver-vacation-1.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/uservacations.pm.addListOfRepliedAdresses       2008-09-11 22:29:26.000000000 +0200
+++ smeserver-vacation-1.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/uservacations.pm        2008-09-11 22:43:43.000000000 +0200
@@ -103,6 +103,14 @@
     $t->render(\@data, $vacation_table);
 }
 
+sub print_replied_addresses
+{
+    my $self = shift;
+    my $q = $self->{cgi};
+
+    return "<pre>@todo -cimplement retrieve and print list of replied user(s)</pre>";
+}
+
 sub modify_link
 {
     my ($data_item, $row, $field) = @_;
--- smeserver-vacation-1.0/root/etc/e-smith/web/functions/uservacations.addListOfRepliedAdresses        2008-09-11 22:29:26.000000000 +0200
+++ smeserver-vacation-1.0/root/etc/e-smith/web/functions/uservacations 2008-09-11 22:44:56.000000000 +0200
@@ -65,6 +65,8 @@
             <label>VACATION_STATUS</label>
         </field>
 
+        <subroutine src="print_replied_addresses()" />
+
         <subroutine src="print_button('SAVE')" />
     </page>
 
1	--- smeserver-vacation-1.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/uservacations.pm.addListOfRepliedAdresses 2008-09-11 22:29:26.000000000 +0200
2	+++ smeserver-vacation-1.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/uservacations.pm 2008-09-11 22:43:43.000000000 +0200
3	@@ -103,6 +103,14 @@
4	$t->render(\@data, $vacation_table);
5	}
6
7	+sub print_replied_addresses
8	+{
9	+ my $self = shift;
10	+ my $q = $self->{cgi};
11	+
12	+ return "<pre>@todo -cimplement retrieve and print list of replied user(s)</pre>";
13	+}
14	+
15	sub modify_link
16	{
17	my ($data_item, $row, $field) = @_;
18	--- smeserver-vacation-1.0/root/etc/e-smith/web/functions/uservacations.addListOfRepliedAdresses 2008-09-11 22:29:26.000000000 +0200
19	+++ smeserver-vacation-1.0/root/etc/e-smith/web/functions/uservacations 2008-09-11 22:44:56.000000000 +0200
20	@@ -65,6 +65,8 @@
21	<label>VACATION_STATUS</label>
22	</field>
23
24	+ <subroutine src="print_replied_addresses()" />
25	+
26	<subroutine src="print_button('SAVE')" />
27	</page>
28