[Rt-commit] r10393 - in rtfm/branches/2.2-RELEASE: sbin

[falcone at bestpractical.com]

Author: falcone
Date: Fri Jan 18 11:28:51 2008
New Revision: 10393

Modified:
   rtfm/branches/2.2-RELEASE/   (props changed)
   rtfm/branches/2.2-RELEASE/META.yml
   rtfm/branches/2.2-RELEASE/Makefile.PL
   rtfm/branches/2.2-RELEASE/sbin/migrate-2.0-to-2.1

Log:
 r28580 at ketch:  falcone | 2008-01-18 11:27:39 -0500
 * remove dependance on YAML just for debugging messages
 * tweak rt version number so it compares properly
 * strictify migration script and fix the debugging messages


Modified: rtfm/branches/2.2-RELEASE/META.yml
==============================================================================
--- rtfm/branches/2.2-RELEASE/META.yml	(original)
+++ rtfm/branches/2.2-RELEASE/META.yml	Fri Jan 18 11:28:51 2008
@@ -1,7 +1,8 @@
 --- 
 abstract: RT FM Extension
+author: ~
 distribution_type: module
-generated_by: Module::Install version 0.670
+generated_by: Module::Install version 0.680
 license: GPL version 2
 meta-spec: 
   url: http://module-build.sourceforge.net/META-spec-v1.3.html
@@ -19,10 +20,9 @@
 requires: 
   HTML::FormatText: 0
   HTML::TreeBuilder: 0
-  RT: 3.4.2
+  RT: 3.004002
   Text::WikiFormat: 0
   Time::ParseDate: 0
   Tree::Simple: 0
-  YAML: 0
   perl: 5.8.0
 version: 2.2.1

Modified: rtfm/branches/2.2-RELEASE/Makefile.PL
==============================================================================
--- rtfm/branches/2.2-RELEASE/Makefile.PL	(original)
+++ rtfm/branches/2.2-RELEASE/Makefile.PL	Fri Jan 18 11:28:51 2008
@@ -5,13 +5,12 @@
 license('GPL version 2');
 requires(
     perl              => 5.008,
-    RT                => '3.4.2',
+    RT                => '3.004002',
     Text::WikiFormat  => 0,
     Tree::Simple      => 0,
     HTML::TreeBuilder => 0,
     Time::ParseDate   => 0,
     HTML::FormatText  => 0,
-    YAML              => 0,
 );
 auto_install();
 

Modified: rtfm/branches/2.2-RELEASE/sbin/migrate-2.0-to-2.1
==============================================================================
--- rtfm/branches/2.2-RELEASE/sbin/migrate-2.0-to-2.1	(original)
+++ rtfm/branches/2.2-RELEASE/sbin/migrate-2.0-to-2.1	Fri Jan 18 11:28:51 2008
@@ -1,10 +1,16 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 use RT;
 RT::LoadConfig;
 RT::Init;
 use RT::FM::CustomFieldCollection;
-use YAML;
+use Data::Dumper;
+
+use strict;
+use warnings;
+
+my $cf_data;
+my @aces_to_delete;
 
 # find each rtfm custom field
 my $cfs = RT::FM::CustomFieldCollection->new($RT::SystemUser);
@@ -95,7 +101,7 @@
         LookupType  => 'RT::FM::Class-RT::FM::Article'
 
     );
-    unless ($core_cf->id) { print "ERROR creating ".$cf->id.": $val ". YAML::Dump($cf_data->{$cf->id}); die;}
+    unless ($core_cf->id) { print "ERROR creating ".$cf->id.": $val ". Dumper($cf_data->{$cf->id}); die;}
     print " Migrated core custom field.\n";
 
     # cache old id, new id
@@ -223,7 +229,7 @@
 	ActivateScrips => 0
       );
 
-        print " $txn_msg\n";
+        print " $transmsg\n";
 }
 
 #print YAML::Dump($cf_data);