diff options
author | Frédéric Buclin <LpSolit@gmail.com> | 2011-08-17 13:18:47 +0200 |
---|---|---|
committer | Frédéric Buclin <LpSolit@gmail.com> | 2011-08-17 13:18:47 +0200 |
commit | 45a4eea5b94d5a90aa83014c51366d42c39ed746 (patch) | |
tree | 246c8c9a9e038fd40872601a852422cee8039fc3 /Bugzilla/Field.pm | |
parent | 589632e9d5d35c25c932aafa164feb92c26f5e3d (diff) | |
download | bugzilla-45a4eea5b94d5a90aa83014c51366d42c39ed746.tar.gz bugzilla-45a4eea5b94d5a90aa83014c51366d42c39ed746.tar.xz |
Bug 662070: Use say() instead of print() where appropriate
r=glob a=LpSolit
Diffstat (limited to 'Bugzilla/Field.pm')
-rw-r--r-- | Bugzilla/Field.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/Bugzilla/Field.pm b/Bugzilla/Field.pm index 219172094..aa3551182 100644 --- a/Bugzilla/Field.pm +++ b/Bugzilla/Field.pm @@ -47,7 +47,7 @@ Bugzilla::Field - a particular piece of information about bugs # Instantiate a Field object for an existing field. my $field = new Bugzilla::Field({name => 'qacontact_accessible'}); if ($field->obsolete) { - print $field->description . " is obsolete\n"; + say $field->description . " is obsolete"; } # Validation Routines @@ -1173,8 +1173,8 @@ sub populate_field_definitions { undef, $field_description); if ($old_field_id && ($old_field_name ne $new_field_name)) { - print "SQL fragment found in the 'fielddefs' table...\n"; - print "Old field name: " . $old_field_name . "\n"; + say "SQL fragment found in the 'fielddefs' table..."; + say "Old field name: $old_field_name"; # We have to fix saved searches first. Queries have been escaped # before being saved. We have to do the same here to find them. $old_field_name = url_quote($old_field_name); @@ -1211,8 +1211,8 @@ sub populate_field_definitions { $sth_UpdateSeries->execute($query, $series_id); } # Now that saved searches have been fixed, we can fix the field name. - print "Fixing the 'fielddefs' table...\n"; - print "New field name: " . $new_field_name . "\n"; + say "Fixing the 'fielddefs' table..."; + say "New field name: $new_field_name"; $dbh->do('UPDATE fielddefs SET name = ? WHERE id = ?', undef, ($new_field_name, $old_field_id)); } |