[request-tracker-maintainers] Bug#463465: request-tracker3.6: Logged errors due to use of an uninitialized variable in Web.pm:1239

[Chris Adams]

Package: request-tracker3.6
Version: 3.6.1-4
Severity: minor
Tags: patch


Web.pm uses a variable which may not always be defined - this causes the
following error:

[Thu Jan 31 19:55:49 2008] [warning]: Use of uninitialized value in
split at /usr/share/request-tracker3.6/lib/RT/Interface/Web.pm line
1239. (/usr/share/request-tracker3.6/lib/RT/Interface/Web.pm:1239)

The attached patch fixes it

-- Package-specific info:
Changed files:
  usr/share/request-tracker3.6/html/Ticket/Elements/Tabs
  usr/share/request-tracker3.6/lib/RT/Action/SendEmail.pm
  usr/share/request-tracker3.6/lib/RT/Interface/Web.pm
  usr/share/request-tracker3.6/lib/RT/Report/Tickets.pm

-- System Information:
Debian Release: 4.0
  APT prefers stable
  APT policy: (990, 'stable')
Architecture: i386 (i686)
Shell:  /bin/sh linked to /bin/bash
Kernel: Linux 2.6.18-6-k7
Locale: LANG=en_US, LC_CTYPE=en_US (charmap=ISO-8859-1)

Versions of packages request-tracker3.6 depends on:
ii  exim4                       4.63-17      metapackage to ease exim MTA (v4) 
ii  exim4-daemon-light [mail-tr 4.63-17      lightweight exim MTA (v4) daemon
ii  libapache-session-perl      1.81-1       Perl modules for keeping persisten
ii  libcache-cache-perl         1.05-2       Managed caches of persistent infor
ii  libcache-simple-timedexpiry 0.26-1       Perl module to cache and expire ke
ii  libcalendar-simple-perl     1.17-2       Perl extension to create simple ca
ii  libclass-returnvalue-perl   0.53-1       A return-value object that lets yo
ii  libdbd-mysql-perl           3.0008-1     A Perl5 database interface to the 
ii  libdbd-pg-perl              1.49-2       a PostgreSQL interface for Perl 5 
ii  libdbi-perl                 1.53-1etch1  Perl5 database interface by Tim Bu
ii  libdbix-searchbuilder-perl  1.45-2       Encapsulate SQL queries and rows i
ii  libexception-class-perl     1.21-1       a module that allows you to declar
ii  libfcgi-perl                0.67-2       FastCGI Perl module
ii  libfreezethaw-perl          0.43-3       converting Perl structures to stri
ii  libgd-graph-perl            1.43.08-2.1  Graph Plotting Module for Perl 5
ii  libgd-text-perl             0.86-3.1     Text utilities for use with GD
ii  libhtml-mason-perl          1:1.35-3     HTML::Mason Perl module
ii  libhtml-parser-perl         3.55-1       A collection of modules that parse
ii  libhtml-scrubber-perl       0.08-3       Perl extension for scrubbing/sanit
ii  liblocale-maketext-fuzzy-pe 0.02-2       Maketext from already interpolated
ii  liblocale-maketext-lexicon- 0.62-1       Lexicon-handling backends for "Loc
ii  liblog-dispatch-perl        2.11-1       Dispatches messages to multiple Lo
ii  libmailtools-perl           1.74-1       Manipulate email in perl programs
ii  libmime-perl                5.420-0.1    Perl5 modules for MIME-compliant m
ii  libmldbm-perl               2.01-1       Store multidimensional hash struct
ii  libmodule-versions-report-p 1.02-3       Report versions of all modules in 
ii  libparams-validate-perl     0.77-1       validate parameters to Perl method
ii  libregexp-common-perl       2.120-4      Provide commonly requested regular
ii  libterm-readkey-perl        2.30-3       A perl module for simple terminal 
ii  libtest-inline-perl         2.103-1      Perl extension for embed tests and
ii  libtext-autoformat-perl     1.13-1       Perl module for automatic text wra
ii  libtext-quoted-perl         1.8-3        Extract the structure of a quoted 
ii  libtext-template-perl       1.44-1.1     Text::Template perl module
ii  libtext-wikiformat-perl     0.78-0.1     translates Wiki formatted text int
ii  libtext-wrapper-perl        1.000-2      Simple word wrapping routine
ii  libtime-modules-perl        2003.1126-2  Various Perl modules for time/date
ii  libtree-simple-perl         1.17-1       A simple tree object
ii  libuniversal-require-perl   0.10-1       Load modules from a variable
ii  libxml-rss-perl             1.05-1       Perl module for managing RSS (RDF 
ii  libxml-simple-perl          2.14-5       Perl module for reading and writin
ii  perl                        5.8.8-7etch1 Larry Wall's Practical Extraction 
ii  rt3.6-apache2               3.6.1-4      Apache 2 specific files for reques
ii  rt3.6-clients               3.6.1-4      Mail gateway and command-line inte
ii  syslog-ng [system-log-daemo 2.0.0-1etch1 Next generation logging daemon

Versions of packages request-tracker3.6 recommends:
ii  mysql-server-5.0 [mysql-se 5.0.32-7etch5 mysql database server binaries

-- debconf-show failed
-------------- next part --------------
--- /usr/share/request-tracker3.6/lib/RT/Interface/Web.pm.orig	2008-01-31 11:56:32.000000000 -0800
+++ /usr/share/request-tracker3.6/lib/RT/Interface/Web.pm	2008-01-31 11:56:45.000000000 -0800
@@ -1236,7 +1236,7 @@
                     } elsif ($CustomFieldObj->Type =~ /text/i) { # Both Text and Wikitext
                         @values = ($ARGSRef->{$arg});
                     } else {
-                        @values = split /\n/, $ARGSRef->{$arg};
+                        @values = split /\n/, $ARGSRef->{$arg} if $ARGSRef->{$arg};
                     }
                     
                     if ( ($CustomFieldObj->Type eq 'Freeform'