Adding the htmlToMarkdownSubtree to the ui

This commit is contained in:
Gloria Meneses 2017-08-26 21:07:56 +00:00 committed by Offray Luna
parent 57ae88b304
commit b2c8d2bfdf

View File

@ -271,6 +271,16 @@ GrafoscopioNotebook >> htmlToMarkdown [
self updateBodyFor: currentNode 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 } { #category : #operation }
GrafoscopioNotebook >> importLinkContent [ GrafoscopioNotebook >> importLinkContent [
"I see if a node header is an url located at 'http://ws.stfx.eu', wich means that is a shared "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'; description: 'HTML to Markdown';
icon: #smallProfile asIcon; icon: #smallProfile asIcon;
action: [ self htmlToMarkdown ] ]. action: [ self htmlToMarkdown ] ].
group
addItem: [ :item |
item
name: nil;
description: 'HTML to Markdown subtree';
icon: #hierarchy asIcon;
action: [ self htmlToMarkdownSubtree ] ].
group group
addItem: [ :item | addItem: [ :item |
item item