use strict; use warnings; use constant SCRIPT_NAME => 'bug'; weechat::register(SCRIPT_NAME, 'Nei ', '0.0', 'GPL3', 'bug without multiplicity', '', '') || return; our $CFG_FILE = weechat::config_new(SCRIPT_NAME, '', ''); our $CFG_FILE_SECTION = weechat::config_new_section($CFG_FILE, 'var', 1, 1, '', '', '', '', '', '', 'config_create_opt', '', '', ''); weechat::config_read($CFG_FILE); weechat::config_new_option($CFG_FILE, $CFG_FILE_SECTION, $_, 'string', '', '', 0, 0, '', $_, 0, '', '', '', '', '', '') for 'hans'; sub config_create_opt { weechat::config_new_option(@_[1..$#_-1], 'string', '', '', 0, 0, '', $_[-1], 0, '', '', '', '', '', ''); weechat::WEECHAT_CONFIG_OPTION_SET_OK_SAME_VALUE }