aniani/irssi
1
0
Fork 0
mirror of https://github.com/irssi/irssi.git synced 2024-10-13 05:03:45 -04:00
Code

Merge pull request #1044 from vague666/perlify_msglevel_hidden

Browse Source 
Make MSGLEVEL_HIDDEN accessible from scripts
This commit is contained in:
ailin-nemui 2019-05-23 10:36:24 +02:00 committed by GitHub
commit 5d70eb18f5
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/perl/common/Core.xs
View File

@ -303,6 +303,13 @@ CODE:
perl_source_remove(tag);
# maybe there's some easier way than this..? :)
int
MSGLEVEL_HIDDEN()
CODE:
RETVAL = MSGLEVEL_HIDDEN;
OUTPUT:
RETVAL
int
MSGLEVEL_CRAP()
CODE:

2
src/perl/common/Irssi.pm
View File

@ -142,7 +142,7 @@ require DynaLoader;
MSGLEVEL_TOPICS MSGLEVEL_WALLOPS MSGLEVEL_INVITES MSGLEVEL_NICKS
MSGLEVEL_DCC MSGLEVEL_DCCMSGS MSGLEVEL_CLIENTNOTICE MSGLEVEL_CLIENTCRAP
MSGLEVEL_CLIENTERROR MSGLEVEL_HILIGHT MSGLEVEL_ALL MSGLEVEL_NOHILIGHT
MSGLEVEL_NO_ACT MSGLEVEL_NEVER MSGLEVEL_LASTLOG
MSGLEVEL_NO_ACT MSGLEVEL_NEVER MSGLEVEL_LASTLOG MSGLEVEL_HIDDEN
);
my $static = 0;