Lines Matching refs:reminder
33 # Add reminder
40 ), 'Add reminder');
46 while ( my $reminder = $reminders->Next ) {
48 $found = 1 if ( $reminder->Subject =~ m/TestReminder/ );
58 # Check that the new reminder is still there and moved to the new queue
63 while ( my $reminder = $reminders->Next ) {
65 if ( $reminder->Subject =~ m/TestReminder/ ) {
67 $ok_queue = 1 if ( $reminder->QueueObj->Name eq 'reminders tests 2' );
74 # Resolve reminder
76 while ( my $reminder = $reminders->Next ) {
77 if ( $reminder->Subject =~ m/TestReminder/ ) {
78 if ( $reminder->Status ne 'resolved' ) {
79 $t->Reminders->Resolve($reminder);
80 $r_resolved = 1 if ( $reminder->Status eq 'resolved' );