mirrors/TiddlyWiki5
1
0
Fork 0
mirror of https://github.com/Jermolene/TiddlyWiki5 synced 2025-01-11 18:00:26 +00:00
Code Issues Releases Wiki Activity

Switch over to procedures from macros

Browse Source
This commit is contained in:
jeremy@jermolene.com 2023-01-18 11:27:14 +00:00
parent b7df3e44bd
commit 74beb05360
2 changed files with 23 additions and 23 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
editions/tw5.com/tiddlers/messages/WidgetMessage_ tm-http-request Example Flickr.tid
View File

@ -4,9 +4,9 @@ tags: $:/tags/Macro
<!--
Get items from a Flickr album/interestingness/collection etc.
-->
\define flickr-get-items(method:"flickr.photosets.getPhotos",resultPhotoRoot:"photoset")
\procedure flickr-get-items(method:"flickr.photosets.getPhotos",resultPhotoRoot:"photoset")
\define completion()
\procedure completion()
\import [[$:/core/ui/PageMacros]] [all[shadows+tiddlers]tag[$:/tags/Macro]!has[draft.of]]
<$action-log msg="In completion"/>
<$action-log/>
@ -35,12 +35,12 @@ Get items from a Flickr album/interestingness/collection etc.
</$list>
\end completion
\define progress()
\procedure progress()
\import [[$:/core/ui/PageMacros]] [all[shadows+tiddlers]tag[$:/tags/Macro]!has[draft.of]]
<$action-log message="In progress-actions"/>
\end progress
\define request-url()
\procedure request-url()
https://api.flickr.com/services/rest/
\end request-url
@ -48,7 +48,7 @@ https://api.flickr.com/services/rest/
$message="tm-http-request"
url=<<request-url>>
method="GET"
query-method=<<__method__>>
query-method=<<method>>
query-extras="geo"
query-format="json"
query-nojsoncallback="1"
@ -59,21 +59,21 @@ https://api.flickr.com/services/rest/
bind-progress="$:/temp/flickr/progress"
oncompletion=<<completion>>
onprogress=<<progress>>
var-start=<<__start__>>
var-limit=<<__limit__>>
var-resultPhotoRoot=<<__resultPhotoRoot__>>
var-start=<<start>>
var-limit=<<limit>>
var-resultPhotoRoot=<<resultPhotoRoot>>
/>
\end
\define flickr-get-album-items()
\procedure flickr-get-album-items()
<$macrocall $name="flickr-get-items" method="flickr.photosets.getPhotos" resultPhotoRoot="photoset"/>
\end
\define flickr-get-interesting-items()
\procedure flickr-get-interesting-items()
<$macrocall $name="flickr-get-items" method="flickr.interestingness.getList" resultPhotoRoot="photos"/>
\end
\define flickr-actions()
\procedure flickr-actions()
<$macrocall $name="flickr-get-album-items"/>
\end

24
editions/tw5.com/tiddlers/messages/WidgetMessage_ tm-http-request Example Zotero.tid
View File

@ -1,7 +1,7 @@
title: WidgetMessage: tm-http-request Example - Zotero
tags: $:/tags/Macro
\define select-zotero-group()
\procedure select-zotero-group()
Specify the Zotero group ID to import
<$edit-text tiddler="$:/config/zotero-group" tag="input"/> or
<$select tiddler="$:/config/zotero-group">
@ -11,7 +11,7 @@ Specify the Zotero group ID to import
</$select>
\end
\define zotero-save-item(item)
\procedure zotero-save-item(item)
<$action-createtiddler
$basetitle={{{ =[[_zotero_import ]] =[<item>jsonget[key]] =[[ ]] =[<item>jsonget[title]] +[join[]] }}}
text={{{ [<item>jsonget[title]] }}}
@ -24,15 +24,15 @@ Specify the Zotero group ID to import
</$action-createtiddler>
\end zotero-save-item
\define zotero-save-items(data)
\procedure zotero-save-items(data)
<$list filter="[<data>jsonindexes[]] :map[<data>jsonextract<currentTiddler>,[data]]" variable="item">
<$macrocall $name="zotero-save-item" item=<<item>>/>
</$list>
\end zotero-save-items
\define zotero-get-items(start:"0",limit:"25")
\procedure zotero-get-items(start:"0",limit:"25")
\define completion()
\procedure completion()
\import [[$:/core/ui/PageMacros]] [all[shadows+tiddlers]tag[$:/tags/Macro]!has[draft.of]]
<$action-log msg="In completion"/>
<$action-log/>
@ -47,12 +47,12 @@ Specify the Zotero group ID to import
</$list>
\end completion
\define progress()
\procedure progress()
\import [[$:/core/ui/PageMacros]] [all[shadows+tiddlers]tag[$:/tags/Macro]!has[draft.of]]
<$action-log message="In progress-actions"/>
\end progress
\define request-url()
\procedure request-url()
\rules only transcludeinline transcludeblock filteredtranscludeinline filteredtranscludeblock
https://api.zotero.org/groups/{{$:/config/zotero-group}}/items/
\end request-url
@ -64,20 +64,20 @@ https://api.zotero.org/groups/{{$:/config/zotero-group}}/items/
method="GET"
query-format="json"
query-sort="title"
query-start=<<__start__>>
query-limit=<<__limit__>>
query-start=<<start>>
query-limit=<<limit>>
header-accept="application/json"
bind-status="$:/temp/zotero/status"
bind-progress="$:/temp/zotero/progress"
oncompletion=<<completion>>
onprogress=<<progress>>
var-start=<<__start__>>
var-limit=<<__limit__>>
var-start=<<start>>
var-limit=<<limit>>
/>
</$wikify>
\end
\define zotero-actions()
\procedure zotero-actions()
<$macrocall $name="zotero-get-items" start="0" limit="50"/>
\end