caption: 
created: 20210904163541416
modified: 20210907161320419
revision: 2
tags: $:/tags/Macro
title: $:/stobot/sticky/macros
type: text/vnd.tiddlywiki

\define sticky-string() \<\<sticky\s".+?"\>\>

\define sticky-table(extrafilter:"")
<$list filter="[regexp:text<sticky-string>$extrafilter$!prefix[$:/stobot/sticky]!is[current]first[1]]" emptyMessage="Congratulations, no stickies left!" variable="x">
  <table>
    <tr><th>Tiddler</th><th>Line</th></tr>
    <$list filter="[regexp:text<sticky-string>$extrafilter$!prefix[$:/stobot/sticky]!is[current]sort[created]]">
      <$list filter="[all[current]get[text]splitregexp[\n]trim[*]trim[**]trim[#]trim[##]regexp<sticky-string>]" variable="line">
        <tr>
          <td><$link/></td>
          <td><<line>></td>
        </tr>
      </$list>
    </$list>
  </table>
</$list>
\end

\define sticky-list()
<$list filter="[all[current]regexp:text<sticky-string>first[1]]" variable="x">
  <h4>Stickies:</h4>
  <$list filter="[all[current]get[text]splitregexp[\n]regexp<sticky-string>]" variable="line">
    <<line>><br>
  </$list>
</$list>
\end

\define sticky-sidebar()
<$list filter="[regexp:text<sticky-string>!prefix[$:/stobot/sticky]!is[current]first[1]]" emptyMessage="Congratulations, no stickies left!" variable="x">
  <$list filter="[regexp:text<sticky-string>!prefix[$:/stobot/sticky]!is[current]sort[created]]">
    <$link/><br>
    <$list filter="[all[current]get[text]splitregexp[\n]regexp<sticky-string>]" variable="line">
      &nbsp;&nbsp;&nbsp;&nbsp;<<line>><br>
    </$list>
    <br>
  </$list>
</$list>
\end

\define sticky(txt)
<$button class="tc-btn-invisible tc-tiddlylink tc-sticky-active" style="color: red;"> ☐&nbsp;$txt$
  <$vars out_base="""<<sticky-done "$txt$" " """ out_time=<<now "YYYY-0MM-0DD hh:mm">> out_end=""" ">>"""  >
    <$vars in="""<<sticky "$txt$">>""" out={{{ [<out_base>addsuffix[Completed: ]addsuffix<out_time>addsuffix<out_end>] }}}>
      <$action-setfield text={{{ [all[current]get[text]search-replace:g:<in>,<out>] }}}/>
    </$vars>
  </$vars>
</$button>
\end

\define sticky-done(txt, log)
<$button class="tc-btn-invisible tc-tiddlylink tc-sticky-done" tooltip="$log$" style="color: inherit;";>&#9745;&nbsp;$txt$
  <$vars in="""<<sticky-done "$txt$" "$log$">>""" out="""<<sticky "$txt$">>""">
    <$action-setfield text={{{ [all[current]get[text]search-replace:g:<in>,<out>] }}}/>
  </$vars>
</$button>
\end