Debugging and adding features.
This commit is contained in:
parent
ea2657883a
commit
217755bfd2
@ -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' }
|
||||
|
Loading…
Reference in New Issue
Block a user