[Rt-commit] r9826 - rt/branches/3.7-RTIR-RELENG/html/Ticket

[ruz at bestpractical.com]

Author: ruz
Date: Wed Dec  5 13:43:53 2007
New Revision: 9826

Modified:
   rt/branches/3.7-RTIR-RELENG/html/Ticket/Create.html

Log:
* use key selector

Modified: rt/branches/3.7-RTIR-RELENG/html/Ticket/Create.html
==============================================================================
--- rt/branches/3.7-RTIR-RELENG/html/Ticket/Create.html	(original)
+++ rt/branches/3.7-RTIR-RELENG/html/Ticket/Create.html	Wed Dec  5 13:43:53 2007
@@ -153,7 +153,15 @@
 % if ( RT->Config->Get('GnuPG')->{'Enable'} ) {
 <tr>
 <td><% loc('Sign')%></td>
-<td><& /Widgets/Form/Boolean:InputOnly, Name => 'Sign', CurrentValue => $ARGS{'Sign'} &></td>
+<td><& /Widgets/Form/Boolean:InputOnly, Name => 'Sign', CurrentValue => $ARGS{'Sign'} &>
+<%PERL>
+    my @signers = ( 
+        ($QueueObj->CorrespondAddress || RT->Config->Get('CorrespondAddress')),
+        $session{'CurrentUser'}->EmailAddress,
+    );
+</%PERL>
+using <& /Elements/SelectKeyForSigning, Addresses => \@signers &>
+</td>
 <td><% loc('Encrypt')%></td>
 <td><& /Widgets/Form/Boolean:InputOnly, Name => 'Encrypt', CurrentValue => $ARGS{'Encrypt'} &></td>
 <td colspan="2">&nbsp;</td>