summaryrefslogtreecommitdiff
path: root/rt/etc/upgrade/3.7.19/content
diff options
context:
space:
mode:
Diffstat (limited to 'rt/etc/upgrade/3.7.19/content')
-rw-r--r--rt/etc/upgrade/3.7.19/content37
1 files changed, 0 insertions, 37 deletions
diff --git a/rt/etc/upgrade/3.7.19/content b/rt/etc/upgrade/3.7.19/content
deleted file mode 100644
index ac34ebe..0000000
--- a/rt/etc/upgrade/3.7.19/content
+++ /dev/null
@@ -1,37 +0,0 @@
-
-{ use strict;
-add_description_to_all_scrips();
-
-sub add_description_to_all_scrips {
- require RT::Scrips;
- my $scrips = RT::Scrips->new( $RT::SystemUser );
- $scrips->Limit( FIELD => 'Description', OPERATOR => 'IS', VALUE => 'NULL' );
- $scrips->Limit( FIELD => 'Description', VALUE => '' );
- while ( my $scrip = $scrips->Next ) {
- my $desc = $scrip->Description;
- next if defined $desc && length $desc;
-
- $desc = gen_scrip_description( $scrip );
-
- my ($status, $msg) = $scrip->SetDescription( $desc );
- unless ( $status ) {
- print STDERR "Couldn't set description of a scrip: $msg";
- } else {
- print "Added description to scrip #". $scrip->id ."\n";
- }
- }
-}
-
-sub gen_scrip_description {
- my $scrip = shift;
- my $condition = $scrip->ConditionObj->Name
- || $scrip->ConditionObj->Description
- || ('On Condition #'. $scrip->Condition);
- my $action = $scrip->ActionObj->Name
- || $scrip->ActionObj->Description
- || ('Run Action #'. $scrip->Action);
- return join ' ', $condition, $action;
-}
-}
-
-1;