Adding time management features.

This commit is contained in:
Ruidajo 2022-02-04 11:47:53 -05:00
parent b894b4b801
commit cad212a9ff
2 changed files with 21 additions and 0 deletions

View File

@ -287,6 +287,7 @@ Tiddler >> markdownLinksAsWikiText [
{ #category : #accessing } { #category : #accessing }
Tiddler >> modified [ Tiddler >> modified [
modified ifNil: [ ^ modified ].
^ modified asZTimestamp ^ modified asZTimestamp
] ]

View File

@ -41,6 +41,20 @@ TiddlyWiki >> addToConfigFile [
^ MarkupFile exportAsFileOn: self configFile containing:(STON toStringPretty: newConfig) ^ 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 } { #category : #accessing }
TiddlyWiki >> configDictonary [ TiddlyWiki >> configDictonary [
^ STONJSON fromString: self configFile contents. ^ STONJSON fromString: self configFile contents.
@ -262,6 +276,12 @@ TiddlyWiki >> tiddlers: anOrderedCollection [
tiddlers := anOrderedCollection tiddlers := anOrderedCollection
] ]
{ #category : #accessing }
TiddlyWiki >> tiddlersFolder [
^ self file parent / 'tiddlers'
]
{ #category : #accessing } { #category : #accessing }
TiddlyWiki >> tiddlersJSONFile [ TiddlyWiki >> tiddlersJSONFile [