diff --git a/app/VideoWeb/Invidious.class.st b/app/VideoWeb/Invidious.class.st index 5688035..f2114a0 100644 --- a/app/VideoWeb/Invidious.class.st +++ b/app/VideoWeb/Invidious.class.st @@ -155,11 +155,14 @@ Invidious >> region: countryISOCode [ { #category : #accessing } Invidious >> responseTime [ - ^ [ ZnClient new + | responseEvaluation | + responseEvaluation := [ ZnClient new beOneShot; url: self uri; get; - response ] timeToRun + response ]. + [ ^ responseEvaluation timeToRun ] onErrorDo: [ ^ 1 class maxVal asDuration "Internal convention for max duration when an error raises." ]. + ] { #category : #accessing }