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

(-)a/installer/data/mysql/atomicupdate/Bug_39142.pl (+22 lines)
Line 0 Link Here
1
use Modern::Perl;
2
use Koha::Installer::Output qw(say_warning say_success say_info);
3
4
return {
5
    bug_number  => "39142",
6
    description => "Adding a Debug User permission",
7
    up          => sub {
8
        my ($args) = @_;
9
        my ( $dbh, $out ) = @$args{qw(dbh out)};
10
11
        # Do you stuffs here
12
        $dbh->do(
13
            q{
14
            INSERT IGNORE INTO userflags (bit, flag, flagdesc, defaulton)
15
            VALUES (31, 'debug', 'Show Debug Interface', 0)
16
        }
17
        );
18
19
        # permissions
20
        say $out "Added new permission 'Debug'";
21
    },
22
};
(-)a/installer/data/mysql/mandatory/userflags.sql (-2 / +2 lines)
Lines 27-31 INSERT INTO userflags (bit, flag, flagdesc, defaulton) VALUES Link Here
27
(27, 'recalls', 'Recalls', 0),
27
(27, 'recalls', 'Recalls', 0),
28
(28, 'erm', 'Manage electronic resources', 0),
28
(28, 'erm', 'Manage electronic resources', 0),
29
(29, 'loggedinlibrary', 'Change logged in library', 0),
29
(29, 'loggedinlibrary', 'Change logged in library', 0),
30
(30, 'preservation', 'Preservation module', 0)
30
(30, 'preservation', 'Preservation module', 0),
31
(31, 'debug', 'Show Debug Interface', 0)
31
;
32
;
32
- 

Return to bug 39142