View | Details | Raw Unified | Return to bug 28108
Collapse All | Expand All

(-)a/C4/Letters.pm (-1 / +2 lines)
Lines 534-541 sub SendAlerts { Link Here
534
        return { error => $error }
534
        return { error => $error }
535
            unless $success;
535
            unless $success;
536
536
537
        my $module = $action eq 'ACQUISITION ORDER' ? 'ACQUISITIONS' : 'CLAIMS';
537
        logaction(
538
        logaction(
538
            "CLAIMS",
539
            $module,
539
            $action,
540
            $action,
540
            undef,
541
            undef,
541
            "To="
542
            "To="
(-)a/installer/data/mysql/atomicupdate/claimslog.perl (-2 / +1 lines)
Lines 2-8 $DBversion = 'XXX'; # will be replaced by the RM Link Here
2
if ( CheckVersion($DBversion) ) {
2
if ( CheckVersion($DBversion) ) {
3
    $dbh->do(q{
3
    $dbh->do(q{
4
        UPDATE action_logs SET module = 'CLAIMS'
4
        UPDATE action_logs SET module = 'CLAIMS'
5
        WHERE module = 'ACQUISITIONS' AND ( action = 'SERIAL CLAIM' OR action = 'ACQUISITION ORDER' OR action = 'ACQUISITION CLAIM')
5
        WHERE module = 'ACQUISITIONS' AND ( action = 'SERIAL CLAIM' OR action = 'ACQUISITION CLAIM')
6
    });
6
    });
7
7
8
    $dbh->do(q{
8
    $dbh->do(q{
9
- 

Return to bug 28108