[9214] 戻り値を返せるようにした、コメントが誤っていたので修正 (Ttssh2-commit) - Tera Term

Revision: 9214
          https://osdn.net/projects/ttssh2/scm/svn/commits/9214
Author:   zmatsuo
Date:     2021-04-20 22:06:15 +0900 (Tue, 20 Apr 2021)
Log Message:
-----------
戻り値を返せるようにした、コメントが誤っていたので修正

- 引数に exitcode_only をつけると、messageboxを表示しない

Modified Paths:
--------------
    branches/4-stable/tests/#41952-gettime.ttl

-------------- next part --------------
Modified: branches/4-stable/tests/#41952-gettime.ttl
===================================================================

--- branches/4-stable/tests/#41952-gettime.ttl	2021-04-19 15:23:49 UTC (rev 9213)
+++ branches/4-stable/tests/#41952-gettime.ttl	2021-04-20 13:06:15 UTC (rev 9214)
@@ -1,14 +1,22 @@
-# gettime\x82̕s\x8B\x82\xF0\x8C\x9F\x8Fo\x82\xB7\x82\xE9
-#
-# - Visual Studio 2005 \x82\xCCC\x83\x89\x83\x93\x83^\x83C\x83\x80\x82ɕs\x8B\x82\xAA\x82\xA0\x82\xE9
-#   - \x8FC\x90\xB3\x83p\x83b\x83`\x82\xAA\x93K\x89\x9E\x82\xB3\x82\xEA\x82Ă\xA2\x82\xE9\x8Fꍇ\x82͖\xE2\x91\xE8\x82͔\xAD\x90\xB6\x82\xB5\x82Ȃ\xA2
-# - \x95s\x8B\x82\xAA\x82\xA0\x82\xE9\x8Fꍇ\x81A\x8E\xC0\x8Dۂ̎\x9E\x8D\x8F\x82Ƃ\xE6\x82\xE81\x8E\x9E\x8AԐi\x82񂾒l\x82\xF0\x95Ԃ\xB7
-# - \x8A\xAB\x95ϐ\x94 TZ\x82̓\xE0\x97e\x81Alocaltime() \x82̌Ăяo\x82\xB5\x95\xFB\x82ɂ\xE6\x82\xC1\x82Ĕ\xAD\x90\xB6
-# - \x83r\x83\x8B\x83h\x82\xB5\x82\xBD Tera Term \x82ɖ\xE2\x91肪\x82Ȃ\xA2\x82\xA9\x83`\x83F\x83b\x83N\x82\xB7\x82\xE9
-#
-# ticket #41952
-# https://ja.osdn.net/projects/ttssh2/ticket/41952
+; gettime\x82̕s\x8B\x82\xF0\x8C\x9F\x8Fo\x82\xB7\x82\xE9
+;
+; - Visual Studio 2005 \x82\xCCC\x83\x89\x83\x93\x83^\x83C\x83\x80\x82ɕs\x8B\x82\xAA\x82\xA0\x82\xE9
+;   - \x8FC\x90\xB3\x83p\x83b\x83`\x82\xAA\x93K\x89\x9E\x82\xB3\x82\xEA\x82Ă\xA2\x82\xE9\x8Fꍇ\x82͖\xE2\x91\xE8\x82͔\xAD\x90\xB6\x82\xB5\x82Ȃ\xA2
+; - \x95s\x8B\x82\xAA\x82\xA0\x82\xE9\x8Fꍇ\x81A\x8E\xC0\x8Dۂ̎\x9E\x8D\x8F\x82Ƃ\xE6\x82\xE81\x8E\x9E\x8AԐi\x82񂾒l\x82\xF0\x95Ԃ\xB7
+; - \x8A\xAB\x95ϐ\x94 TZ\x82̓\xE0\x97e\x81Alocaltime() \x82̌Ăяo\x82\xB5\x95\xFB\x82ɂ\xE6\x82\xC1\x82Ĕ\xAD\x90\xB6
+; - \x83r\x83\x8B\x83h\x82\xB5\x82\xBD Tera Term \x82ɖ\xE2\x91肪\x82Ȃ\xA2\x82\xA9\x83`\x83F\x83b\x83N\x82\xB7\x82\xE9
+;
+; ticket #41952
+; https://ja.osdn.net/projects/ttssh2/ticket/41952
 
+exitcode_only = 0
+if paramcnt == 2 then
+    strcompare params[2] "exitcode_only"
+    if result == 0 then
+       exitcode_only = 1
+    endif
+endif
+
 tz2="UTC"
 gettime tm2 "%Y/%m/%d %H:%M:%S" tz2
 
@@ -19,7 +27,12 @@
 
 strcompare tm2 tm3
 if result <> 0 then
-    messagebox "getdate has problem!" "tera term"
+    setexitcode 0;
+    msg = "getdate has problem!"
 else
-    messagebox "no problem" "tera term"
+    setexitcode 1;
+    msg = "no problem"
 endif
+if exitcode_only == 0 then
+    messagebox msg "tera term"
+endif


Tera Term

[Ttssh2-commit] [9214] 戻り値を返せるようにした、コメントが誤っていたので修正