mirror of
https://github.com/wifinigel/MikrotikScripting.git
synced 2025-06-21 09:25:42 +02:00
add mising semi-colon & fix return array
This commit is contained in:
parent
3b7f9b30bd
commit
cf3f613f3d
4 changed files with 10 additions and 10 deletions
|
@ -3,7 +3,7 @@
|
||||||
# A simple script to perform a series of tests on a
|
# A simple script to perform a series of tests on a
|
||||||
# list of web sites.
|
# list of web sites.
|
||||||
|
|
||||||
:global Filename "ch10-07-bad-script.rsc"
|
:global Filename "ch10-07-bad-script.rsc";
|
||||||
|
|
||||||
# function to log error messages
|
# function to log error messages
|
||||||
:global LogMessageFunc do={
|
:global LogMessageFunc do={
|
||||||
|
@ -80,7 +80,7 @@
|
||||||
} on-error={
|
} on-error={
|
||||||
$LogMessageFunc ("GetWebPageFunc: unable to retrieve site: \
|
$LogMessageFunc ("GetWebPageFunc: unable to retrieve site: \
|
||||||
$SiteName !");
|
$SiteName !");
|
||||||
:return { "*** test failed ***" }
|
:return { "duration"="*** test failed ***" }
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -3,7 +3,7 @@
|
||||||
# A simple script to perform a series of tests on a
|
# A simple script to perform a series of tests on a
|
||||||
# list of web sites.
|
# list of web sites.
|
||||||
|
|
||||||
:global Filename "ch10-08-bad-script.rsc"
|
:global Filename "ch10-08-bad-script.rsc";
|
||||||
|
|
||||||
# set DEBUG to "true" for script debugging output,
|
# set DEBUG to "true" for script debugging output,
|
||||||
# "false" for normal operation
|
# "false" for normal operation
|
||||||
|
@ -91,7 +91,7 @@
|
||||||
([:len $SiteName] < 6)) do={
|
([:len $SiteName] < 6)) do={
|
||||||
$LogMessageFunc ("GetWebPageFunc: arg value $SiteName not a \
|
$LogMessageFunc ("GetWebPageFunc: arg value $SiteName not a \
|
||||||
valid string!");
|
valid string!");
|
||||||
:return { "*** test failed ***" };
|
:return { "duration"="*** test failed ***" }
|
||||||
}
|
}
|
||||||
|
|
||||||
do {
|
do {
|
||||||
|
@ -100,7 +100,7 @@
|
||||||
} on-error {
|
} on-error {
|
||||||
$LogMessageFunc ("GetWebPageFunc: unable to retrieve site: \
|
$LogMessageFunc ("GetWebPageFunc: unable to retrieve site: \
|
||||||
$SiteName !");
|
$SiteName !");
|
||||||
return { "*** test failed ***" };
|
:return { "duration"="*** test failed ***" }
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -3,7 +3,7 @@
|
||||||
# A simple script to perform a series of tests on a
|
# A simple script to perform a series of tests on a
|
||||||
# list of web sites.
|
# list of web sites.
|
||||||
|
|
||||||
:global Filename "ch10-07-bad-script.rsc"
|
:global Filename "ch10-07-bad-script.rsc";
|
||||||
|
|
||||||
# function to log error messages
|
# function to log error messages
|
||||||
:global LogMessageFunc do={
|
:global LogMessageFunc do={
|
||||||
|
@ -80,7 +80,7 @@
|
||||||
} on-error={
|
} on-error={
|
||||||
$LogMessageFunc ("GetWebPageFunc: unable to retrieve site: \
|
$LogMessageFunc ("GetWebPageFunc: unable to retrieve site: \
|
||||||
$SiteName !");
|
$SiteName !");
|
||||||
:return { "*** test failed ***" }
|
:return { "duration"="*** test failed ***" }
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -3,7 +3,7 @@
|
||||||
# A simple script to perform a series of tests on a
|
# A simple script to perform a series of tests on a
|
||||||
# list of web sites.
|
# list of web sites.
|
||||||
|
|
||||||
:global Filename "ch10-08-bad-script.rsc"
|
:global Filename "ch10-08-bad-script.rsc";
|
||||||
|
|
||||||
# set DEBUG to "true" for script debugging output,
|
# set DEBUG to "true" for script debugging output,
|
||||||
# "false" for normal operation
|
# "false" for normal operation
|
||||||
|
@ -91,7 +91,7 @@
|
||||||
([:len $SiteName] < 6)) do={
|
([:len $SiteName] < 6)) do={
|
||||||
$LogMessageFunc ("GetWebPageFunc: arg value $SiteName not a \
|
$LogMessageFunc ("GetWebPageFunc: arg value $SiteName not a \
|
||||||
valid string!");
|
valid string!");
|
||||||
:return { "*** test failed ***" };
|
:return { "duration"="*** test failed ***" }
|
||||||
}
|
}
|
||||||
|
|
||||||
do {
|
do {
|
||||||
|
@ -100,7 +100,7 @@
|
||||||
} on-error {
|
} on-error {
|
||||||
$LogMessageFunc ("GetWebPageFunc: unable to retrieve site: \
|
$LogMessageFunc ("GetWebPageFunc: unable to retrieve site: \
|
||||||
$SiteName !");
|
$SiteName !");
|
||||||
return { "*** test failed ***" };
|
:return { "duration"="*** test failed ***" }
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue