Adding time management features.
This commit is contained in:
parent
b894b4b801
commit
cad212a9ff
@ -287,6 +287,7 @@ Tiddler >> markdownLinksAsWikiText [
|
||||
{ #category : #accessing }
|
||||
Tiddler >> modified [
|
||||
|
||||
modified ifNil: [ ^ modified ].
|
||||
^ modified asZTimestamp
|
||||
]
|
||||
|
||||
|
@ -41,6 +41,20 @@ TiddlyWiki >> addToConfigFile [
|
||||
^ MarkupFile exportAsFileOn: self configFile containing:(STON toStringPretty: newConfig)
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
TiddlyWiki >> changesAfter: aDate [
|
||||
|
||||
| recent created modified wiki |
|
||||
wiki := self withoutImages withoutPDFs contentTiddlers.
|
||||
created := wiki select: [ :tiddler | tiddler created > aDate ].
|
||||
modified := wiki select: [ :tiddler | tiddler modified isNotNil
|
||||
and: [ tiddler modified > aDate ] ].
|
||||
|
||||
recent := OrderedCollection new.
|
||||
recent addAll: created; addAll: modified.
|
||||
^ recent
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
TiddlyWiki >> configDictonary [
|
||||
^ STONJSON fromString: self configFile contents.
|
||||
@ -262,6 +276,12 @@ TiddlyWiki >> tiddlers: anOrderedCollection [
|
||||
tiddlers := anOrderedCollection
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
TiddlyWiki >> tiddlersFolder [
|
||||
|
||||
^ self file parent / 'tiddlers'
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
TiddlyWiki >> tiddlersJSONFile [
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user