diff --git a/app/BaselineOfVideoWeb/BaselineOfVideoWeb.class.st b/app/BaselineOfVideoWeb/BaselineOfVideoWeb.class.st index 43f39c6..93985d9 100644 --- a/app/BaselineOfVideoWeb/BaselineOfVideoWeb.class.st +++ b/app/BaselineOfVideoWeb/BaselineOfVideoWeb.class.st @@ -16,5 +16,5 @@ BaselineOfVideoWeb >> baseline: spec [ { #category : #accessing } BaselineOfVideoWeb >> semanticVersion [ - ^ '0.4.1' + ^ '0.4.2' ] diff --git a/app/VideoWeb/BrAsyncFileWidget.extension.st b/app/VideoWeb/BrAsyncFileWidget.extension.st deleted file mode 100644 index 554b1bd..0000000 --- a/app/VideoWeb/BrAsyncFileWidget.extension.st +++ /dev/null @@ -1,23 +0,0 @@ -Extension { #name : #BrAsyncFileWidget } - -{ #category : #'*VideoWeb' } -BrAsyncFileWidget >> url: aUrl [ - - | realUrl imageUrl | - realUrl := aUrl asZnUrl. - - realUrl scheme = #file ifTrue: [ - ^ self file: realUrl asFileReference ]. - imageUrl := realUrl. - realUrl host = 'www.youtube.com' ifTrue: [ | video | - video := Invidious defaultInstance video: (realUrl queryAt: 'v'). - imageUrl := video defaultThumbnailLink asUrl. - ]. - - self stencil: [ - (SkiaImage fromForm: - (Form fromBase64String: imageUrl retrieveContents base64Encoded)) - asElement constraintsDo: [ :c | - c horizontal matchParent. - c vertical matchParent ] ] -]