37 lines
888 B
Smalltalk
37 lines
888 B
Smalltalk
Class {
|
|
#name : #HedgeDocExamples,
|
|
#superclass : #Object,
|
|
#category : #'MiniDocs-Examples'
|
|
}
|
|
|
|
{ #category : #accessing }
|
|
HedgeDocExamples >> hedgeDocReplaceYoutubeEmbeddedLinkExample [
|
|
<gtExample>
|
|
| aSampleString hedgedocDoc parsedCollection hedgedocDocLinksReplaced |
|
|
aSampleString := '---
|
|
breaks: false
|
|
|
|
---
|
|
|
|
# Titulo
|
|
|
|
Un texto de ejemplo
|
|
|
|
# Enlaces youtube
|
|
|
|
{%youtube 1aw3XmTqFXA %}
|
|
|
|
otro video
|
|
|
|
{%youtube U7mpXaLN9Nc %}'.
|
|
hedgedocDoc := HedgeDoc new
|
|
contents: aSampleString.
|
|
hedgedocDocLinksReplaced := HedgeDoc new contents: aSampleString; youtubeEmbeddedLinksToMarkdeepFormat.
|
|
self assert: (hedgedocDoc contents
|
|
includesSubstring: '{%youtube 1aw3XmTqFXA %}' ).
|
|
self assert: (hedgedocDocLinksReplaced contents
|
|
includesSubstring: '' ).
|
|
^ { 'Original' -> hedgedocDoc .
|
|
'Replaced' -> hedgedocDocLinksReplaced } asDictionary
|
|
]
|