Adding the htmlToMarkdownSubtree to the ui

This commit is contained in:
GloriaMeneses 2017-08-26 21:07:56 +00:00 committed by SantiagoBragagnolo
parent fbd389bb58
commit ed364ef6ee
1 changed files with 17 additions and 0 deletions

View File

@ -271,6 +271,16 @@ GrafoscopioNotebook >> htmlToMarkdown [
self updateBodyFor: currentNode
]
{ #category : #operation }
GrafoscopioNotebook >> htmlToMarkdownSubtree [
| currentNode nodeContent |
currentNode := tree highlightedItem.
currentNode ifNil: [ ^ self ].
nodeContent := currentNode content.
nodeContent htmlToMarkdownSubtree.
self updateBodyFor: currentNode
]
{ #category : #operation }
GrafoscopioNotebook >> importLinkContent [
"I see if a node header is an url located at 'http://ws.stfx.eu', wich means that is a shared
@ -846,6 +856,13 @@ GrafoscopioNotebook >> topBar [
description: 'HTML to Markdown';
icon: #smallProfile asIcon;
action: [ self htmlToMarkdown ] ].
group
addItem: [ :item |
item
name: nil;
description: 'HTML to Markdown subtree';
icon: #hierarchy asIcon;
action: [ self htmlToMarkdownSubtree ] ].
group
addItem: [ :item |
item