From ccb342a04165847e3721438041521a4ce64eda30 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 16 Mar 2012 20:12:05 +0000 Subject: update fake packages with function expecting any number of arguments (reduce perl_checker SNR) --- fake_packages/Curses/UI.pm | 86 +++++++++++++++++++++++----------------------- 1 file changed, 43 insertions(+), 43 deletions(-) (limited to 'fake_packages/Curses') diff --git a/fake_packages/Curses/UI.pm b/fake_packages/Curses/UI.pm index 72cc81f..85dc1cc 100644 --- a/fake_packages/Curses/UI.pm +++ b/fake_packages/Curses/UI.pm @@ -1,7 +1,7 @@ package Curses::UI; our @ISA = qw(); -sub add { my ($_o_args) = @_ } +sub add { my (@_more_paras) = @_ } sub add() {} sub add_callback() {} sub calendardialog() {} @@ -35,13 +35,13 @@ sub leave_curses() {} sub loadfilebrowser() {} sub mainloop { my ($_o_self) = @_ } sub mainloopExit() {} -sub new { my ($_class, $_o_userargs) = @_ } +sub new { my ($_class, @_more_paras) = @_ } sub noprogress() {} sub nostatus() {} sub object_at_xy($$;$) {} sub overlapping(;$) {} sub process_args() {} -sub progress { my ($_o_args) = @_ } +sub progress { my (@_more_paras) = @_ } sub progress() {} sub question() {} sub reset_curses() {} @@ -52,7 +52,7 @@ sub set_read_timeout() {} sub set_timer($$;) {} sub setprogress($;$) {} sub status($;) {} -sub tempdialog { my ($_o_args) = @_ } +sub tempdialog { my (@_more_paras) = @_ } sub tempdialog() {} sub usemodule($;) {} sub userdata() {} @@ -67,7 +67,7 @@ sub get() {} sub get_selected_button() {} sub layout() {} sub mouse_button1($$$$;) {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } sub next_button() {} sub press_button() {} sub previous_button() {} @@ -100,7 +100,7 @@ sub layout() {} sub make_sane_date() {} sub month($;) {} sub mouse_button($$$$;) {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } sub onChange(;$) {} sub setdate($;$) {} sub year($;) {} @@ -113,7 +113,7 @@ sub event_onblur() {} sub get() {} sub layout() {} sub mouse_button1($$$$;) {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } sub onChange(;$) {} sub toggle() {} sub uncheck() {} @@ -124,7 +124,7 @@ sub colors() {} sub define_color { my ($_r, $_g, $_o_b) = @_ } sub get_color_pair() {} sub get_colors() {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } package Curses::UI::Common; our @ISA = qw(); @@ -151,7 +151,7 @@ sub text_wrap($$;) { my ($_line, $_maxlen, $_o_wordwrap) = @_ } package Curses::UI::Container; our @ISA = qw(); -sub add($@) { my ($_o_args) = @_ } +sub add($@) { my (@_more_paras) = @_ } sub base_id2idx($;) {} sub delete(;$) {} sub delete_subwindows() {} @@ -169,10 +169,10 @@ sub getobj($;) {} sub hasa($;) {} sub layout() {} sub layout_contained_objects() {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } sub new() {} -sub set_draworder(@) { my ($_o_order) = @_ } -sub set_focusorder(@) { my ($_o_order) = @_ } +sub set_draworder(@) { my (@_more_paras) = @_ } +sub set_focusorder(@) { my (@_more_paras) = @_ } sub window_is_ontop($;) {} package Curses::UI::ContainerWidget; @@ -183,13 +183,13 @@ package Curses::UI::Dialog::Basic; our @ISA = qw(); sub get() {} sub layout() {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } package Curses::UI::Dialog::Calendar; our @ISA = qw(); sub get() {} sub layout() {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } sub press_button_callback() {} package Curses::UI::Dialog::Dirbrowser; @@ -201,14 +201,14 @@ sub get_dir() {} sub goto_homedirectory() {} sub layout() {} sub maskbox_onchange() {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } sub press_button_callback() {} sub select_homedirectory() {} package Curses::UI::Dialog::Error; our @ISA = qw(); sub draw(;$) {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } package Curses::UI::Dialog::Filebrowser; our @ISA = qw(); @@ -220,7 +220,7 @@ sub get_dir() {} sub goto_homedirectory() {} sub layout() {} sub maskbox_onchange() {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } sub press_button_callback() {} sub select_homedirectory() {} @@ -229,21 +229,21 @@ our @ISA = qw(); sub focus() {} sub layout() {} sub message() {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } sub pos($;) {} package Curses::UI::Dialog::Question; our @ISA = qw(); sub get() {} sub layout() {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } package Curses::UI::Dialog::Status; our @ISA = qw(); sub focus() {} sub layout() {} sub message($;) {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } package Curses::UI::Label; our @ISA = qw(); @@ -254,7 +254,7 @@ sub dim() {} sub draw(;$) {} sub get() {} sub layout() {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } sub reverse() {} sub set_attribute($$;) {} sub text($;$) {} @@ -285,9 +285,9 @@ sub insert_at() {} sub labels(;$) {} sub layout() {} sub layout_content() {} -sub maxlabelwidth(@) { my ($_o_args) = @_ } +sub maxlabelwidth(@) { my (@_more_paras) = @_ } sub mouse_button1($$$;) {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } sub number_of_lines() {} sub onChange(;$) {} sub onSelectionChange(;$) {} @@ -312,7 +312,7 @@ sub cursor_left() {} sub cursor_right() {} sub escape_key() {} sub mouse_button1() {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } sub new() {} sub option_select() {} @@ -328,14 +328,14 @@ sub menu_left() {} sub menu_right() {} sub menuoption_selected() {} sub mouse_button1() {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } sub pulldown() {} package Curses::UI::Notebook; our @ISA = qw(); sub activate_page($$) {} sub active_page($) {} -sub add_page($$;) { my ($_o_userargs) = @_ } +sub add_page($$;) { my (@_more_paras) = @_ } sub debug_msg(;$) {} sub delete_page($$) {} sub draw($;$) {} @@ -344,13 +344,13 @@ sub intellidraw(;$) {} sub last_page($) {} sub layout($) {} sub mouse_button1($$$$) {} -sub new($;) { my ($_o_userargs) = @_ } +sub new($;) { my (@_more_paras) = @_ } sub next_page($) {} sub prev_page($) {} package Curses::UI::PasswordEntry; our @ISA = qw(); -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } package Curses::UI::Popupmenu; our @ISA = qw(); @@ -358,7 +358,7 @@ sub draw(;$) {} sub get() {} sub layout() {} sub mouse_button1($$$;) {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } sub onChange(;$) {} sub open_popup() {} sub select_next() {} @@ -373,19 +373,19 @@ package Curses::UI::Progressbar; our @ISA = qw(); sub draw(;$) {} sub get() {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } sub pos(;$) {} package Curses::UI::Radiobuttonbox; our @ISA = qw(); -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } package Curses::UI::SearchEntry; our @ISA = qw(); sub entry_loose_focus() {} sub event_keypress($;) {} sub get() {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } sub new() {} sub pos(;$) {} sub prompt(;$) {} @@ -434,7 +434,7 @@ sub getrealxpos() {} sub layout() {} sub layout_content() {} sub mouse_button1($$$$;) {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } sub newline() {} sub number_of_columns() {} sub number_of_lines() {} @@ -456,11 +456,11 @@ sub undo() {} package Curses::UI::TextEntry; our @ISA = qw(); -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } package Curses::UI::TextViewer; our @ISA = qw(); -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } package Curses::UI::Widget; our @ISA = qw(); @@ -474,7 +474,7 @@ sub canvaswidth() {} sub clear_binding($;) {} sub clear_event($;) {} sub delete_subwindows() {} -sub do_routine($;$) { my ($_o_arguments) = @_ } +sub do_routine($;$) { my (@_more_paras) = @_ } sub dobeep() {} sub draw(;$) {} sub draw_scrollbars() {} @@ -485,7 +485,7 @@ sub event_onfocus() {} sub focus() {} sub focusable(;$) {} sub height() {} -sub height_by_windowscrheight($@) { my ($_o_args) = @_ } +sub height_by_windowscrheight($@) { my (@_more_paras) = @_ } sub hidden() {} sub hide() {} sub in_topwindow() {} @@ -495,15 +495,15 @@ sub loose_focus() {} sub lose_focus() {} sub modalfocus() {} sub mouse_button1($$$$;) {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } sub onBlur($;$) {} sub onFocus($;$) {} sub parentwindow() {} -sub process_bindings($;$@) { my ($_o_extra) = @_ } +sub process_bindings($;$@) { my (@_more_paras) = @_ } sub process_padding($;) {} sub run_event($;) {} sub schedule_draw(;$) {} -sub set_binding($@) { my ($_o_keys) = @_ } +sub set_binding($@) { my (@_more_paras) = @_ } sub set_color_bbg() {} sub set_color_bfg() {} sub set_color_bg() {} @@ -513,16 +513,16 @@ sub set_color_sfg() {} sub set_color_tbg() {} sub set_color_tfg() {} sub set_event($;$) {} -sub set_mouse_binding($@) { my ($_o_mouse_events) = @_ } +sub set_mouse_binding($@) { my (@_more_paras) = @_ } sub set_routine($$;) {} sub show() {} sub title() {} sub userdata() {} sub width() {} -sub width_by_windowscrwidth($@) { my ($_o_args) = @_ } +sub width_by_windowscrwidth($@) { my (@_more_paras) = @_ } sub windowparameters() {} package Curses::UI::Window; our @ISA = qw(); sub layout() {} -sub new { my ($_o_userargs) = @_ } +sub new { my (@_more_paras) = @_ } -- cgit v1.2.1