diff --git a/repository/TiddlyWiki/Tiddler.class.st b/repository/TiddlyWiki/Tiddler.class.st index cf06d27..3a23635 100644 --- a/repository/TiddlyWiki/Tiddler.class.st +++ b/repository/TiddlyWiki/Tiddler.class.st @@ -22,6 +22,16 @@ Class { #category : #'TiddlyWiki-Model' } +{ #category : #accessing } +Tiddler >> asDictionary [ + ^ Dictionary new + at: 'title' put: self title; + at: 'text' put: self text; + at: 'created' put: self created asString; + at: 'tags' put: self tags; + yourself. +] + { #category : #accessing } Tiddler >> caption [ @@ -37,7 +47,7 @@ Tiddler >> caption: anObject [ { #category : #accessing } Tiddler >> created [ - ^ created + ^ created ifNil: [ created := DateAndTime now ] ] { #category : #accessing }