Debugging and adding features.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2022-09-21 21:15:11 -05:00
parent ea2657883a
commit 217755bfd2
1 changed files with 7 additions and 2 deletions

View File

@ -11,7 +11,12 @@ LeDatabase >> addPageFromMarkdeepUrl: aString [
{ #category : #'*MiniDocs' }
LeDatabase >> addPageFromString: markdeepDocTree [
^ markdeepDocTree
| remoteMetadata page |
remoteMetadata := Markdeep new metadataFromXML: markdeepDocTree.
page := LePage new
title: (remoteMetadata at: 'title');
basicUid: (remoteMetadata at: 'id').
^ {markdeepDocTree . page . remoteMetadata }
]
@ -27,7 +32,7 @@ LeDatabase >> detectLocalPageForRemote: markdeepDocUrl [
{ #category : #'*MiniDocs' }
LeDatabase >> docTreeForLink: aString [
^ (XMLHTMLParser on: aString) parseDocument
^ (XMLHTMLParser on: aString asUrl retrieveContents) parseDocument
]
{ #category : #'*MiniDocs' }