rt/webrt/Elements/SelectWatcherType

   1 %# $Header: /home/cvs/cvsroot/freeside/rt/webrt/Elements/Attic/SelectWatcherType,v 1.1 2002-08-12 06:17:08 ivan Exp $
   2 %# portions Copyright 2000 Tobias Brox <tobix@fsck.com>
   3 %# Request Tracker is Copyright 1996-2000 Jesse Vincent <jesse@fsck.com>
   4
   5 <SELECT NAME ="<%$Name%>">
   6 <OPTION VALUE="none">-</OPTION>
   7 %# Make nice options:
   8 %for my $option (@types) {
   9 <OPTION VALUE="<%$option%>" <%$option eq $Default && "SELECTED"%>><%$option%></OPTION>
  10 %}
  11 </SELECT>
  12
  13 <%INIT>
  14 my @types;
  15 if ($Scope =~ 'queue') {
  16    @types = qw(Cc AdminCc);
  17 }
  18 else {
  19    @types = qw(Requestor Cc AdminCc);
  20 }
  21 </%INIT>
  22 <%ARGS>
  23 $Default=>undef
  24 $Scope => 'ticket'
  25 $Name => 'WatcherType'
  26 </%ARGS>