Revision: 8775 https://osdn.net/projects/ttssh2/scm/svn/commits/8775 Author: zmatsuo Date: 2020-05-15 00:11:24 +0900 (Fri, 15 May 2020) Log Message: ----------- macrodir と dirnamebox のテストを分けた Modified Paths: -------------- trunk/tests/test_file.ttl -------------- next part -------------- Modified: trunk/tests/test_file.ttl =================================================================== --- trunk/tests/test_file.ttl 2020-05-14 15:11:16 UTC (rev 8774) +++ trunk/tests/test_file.ttl 2020-05-14 15:11:24 UTC (rev 8775) @@ -14,15 +14,19 @@ ;;; -;;; test folder +;;; test macrodir ;;; :test_macrodir :retry getdir macro_dir +s = "folder (getdir):\n" +strspecial s +strconcat s macro_dir +messagebox s "test_file.ttl" dirnamebox "test_file.ttl folder for test" macro_dir -s = "folder for test:\n" +s = "selected folder:\n" strspecial s -strconcat s macro_dir +strconcat s inputstr yesnobox s "test_file.ttl" if result == 0 goto retry setdir macro_dir