Functionality migrated from LepiterPlugins repository.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2023-01-01 12:56:51 -05:00
parent 8e9cfe4345
commit 1ea7736b0f
2 changed files with 17 additions and 0 deletions

View File

@ -10,3 +10,14 @@ LeSnippet class >> fromMetaMarkdeep: div [
snippet contentFrom: div.
^ snippet.
]
{ #category : #'*MiniDocs' }
LeSnippet >> moveTo: pageName [
| db origin destination thisSnippet |
thisSnippet := self snippetModel.
db := self page database.
destination := db pageNamed: pageName.
origin := db pageNamed: thisSnippet page title.
origin removeSnippet: thisSnippet.
destination addSnippet: thisSnippet.
]

View File

@ -0,0 +1,6 @@
Extension { #name : #LeTextCoderSnippetElement }
{ #category : #'*MiniDocs' }
LeTextCoderSnippetElement >> moveTo: pageName [
LeSnippet new moveTo: pageName
]