樋口先生、
語の取捨選択(ファイル使用)の自動化を試みていますがうまくいかないためこのスレッドに便乗して質問させていただきます。
強制抽出する語リストのファイル: mark.txt
強制抽出する語リストのファイル: stop.txt
として、これらを読み込んで前処理を実行したいと思っています。該当するモジュールはgui_window::dictionary (dictionary.pm)にありそうで、語の取捨選択の"ファイルから読み込み"にチェックして、ファイル名(フルパス)で指定して、$win->save;を呼び出したところ、コマンドラインで以下のエラーが表示されて終了してしまいました。どのパラメーターが不足しているのか私の力ではこれ以上解明できなかったため質問させていただきます。下記コードにどのようなコードを追加すれば(あるいは変更すれば)所望の動作が得られるでしょうか?
よろしくお願いいたします。
1) エラーコード(コマンドプロンプト)
Can't call method "refresh" on an undefined value at /<C:\khcoder\kh_coder.exe>gui_window/dictionary.pm line 479.
2) auto_run.pmの、#前処理実行"直前に追加したコード
#追加コードスタート-----------------------------
# ここで強制抽出語と非抽出語を指定したい
#-----------------------------------------------
my $file_mark = 'C:\khcoder\mark.txt';
my $file_stop = 'C:\khcoder\stop.txt';
# 語句の取捨選択メニューオープン
my $win = gui_window::dictionary->open;
# 強制抽出・ファイル設定
$win->{config}->{ff_mark_check_v}=1;
$win->{config}->{ff_mark_entry}=$file_mark;
# 使用しない語・ファイル設定
$win->{config}->{ff_stop_check_v}=1;
$win->{config}->{ff_stop_entry}=$file_stop;
$win->save;
#追加コード終了-----------------------------------
# 前処理実行
my $wait_window = gui_wait->start;
&gui_window::main::menu::mc_morpho_exec;
$wait_window->end(no_dialog => 1);
以上です。
---