mirror of
https://github.com/SqrtMinusOne/sqrtminusone.github.io.git
synced 2025-12-11 00:03:02 +03:00
deploy: ec9d4f60e5
This commit is contained in:
SqrtMinusOne
parent
f577e353f6
commit
bf5be54571
4 changed files with 149 additions and 18 deletions
|
|
@ -6914,10 +6914,12 @@ Didn’t work out as I expected, so I’ve made <code>org-journal-tags</
|
|||
<p>The default UI is a bit rough, but Nicolas Rougier’s <a href="https://github.com/rougier/mastodon-alt">mastodon-alt</a> package makes things a bit more how I would like to see them.</p>
|
||||
<div class="highlight"><pre tabindex="0" style=";-moz-tab-size:4;-o-tab-size:4;tab-size:4;"><code class="language-emacs-lisp" data-lang="emacs-lisp"><span style="display:flex;"><span>(<span style="color:#008000">use-package</span> <span style="color:#19177c">mastodon</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#008000">:straight</span> <span style="color:#800">t</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#008000">:commands</span> (<span style="color:#19177c">my/mastodon</span>)
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#008000">:init</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">my-leader-def</span> <span style="color:#ba2121">"an"</span> <span style="color:#00f">#'</span><span style="color:#19177c">my/mastodon</span>)
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#008000">:config</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">setq</span> <span style="color:#19177c">mastodon-instance-url</span> <span style="color:#ba2121">"https://emacs.ch"</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">setq</span> <span style="color:#19177c">mastodon-active-user</span> <span style="color:#ba2121">"sqrtminusone"</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">my-leader-def</span> <span style="color:#ba2121">"an"</span> <span style="color:#00f">#'</span><span style="color:#19177c">my/mastodon</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">my/persp-add-rule</span> <span style="color:#19177c">mastodon-mode</span> <span style="color:#666">0</span> <span style="color:#ba2121">"mastodon"</span>)
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#408080;font-style:italic">;; Hide spoilers by default</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">setq-default</span> <span style="color:#19177c">mastodon-toot--content-warning</span> <span style="color:#800">t</span>)
|
||||
|
|
@ -6937,7 +6939,7 @@ Didn’t work out as I expected, so I’ve made <code>org-journal-tags</
|
|||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">edited</span> <span style="color:#ba2121">""</span> <span style="color:#666">.</span> <span style="color:#ba2121">"[edited]"</span>))))
|
||||
</span></span><span style="display:flex;"><span>
|
||||
</span></span><span style="display:flex;"><span>(<span style="color:#008000">use-package</span> <span style="color:#19177c">mastodon-alt</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#008000">:straight</span> (<span style="color:#008000">:host</span> <span style="color:#19177c">github</span> <span style="color:#008000">:repo</span> <span style="color:#ba2121">"SqrtMinusOne/mastodon-alt"</span>)
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#008000">:straight</span> (<span style="color:#008000">:host</span> <span style="color:#19177c">github</span> <span style="color:#008000">:repo</span> <span style="color:#ba2121">"rougier/mastodon-alt"</span>)
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#008000">:after</span> (<span style="color:#19177c">mastodon</span>)
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#008000">:config</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">mastodon-alt-tl-activate</span>))
|
||||
|
|
@ -6966,6 +6968,146 @@ Didn’t work out as I expected, so I’ve made <code>org-journal-tags</
|
|||
</span></span><span style="display:flex;"><span> <span style="color:#ba2121">"r"</span> <span style="color:#19177c">'mastodon-tl--update</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#ba2121">"c"</span> <span style="color:#00f">#'</span><span style="color:#19177c">mastodon-tl--toggle-spoiler-text-in-toot</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#ba2121">"q"</span> <span style="color:#00f">#'</span><span style="color:#19177c">kill-current-buffer</span>))
|
||||
</span></span></code></pre></div><h5 id="modeline-segment">Modeline segment</h5>
|
||||
<div class="highlight"><pre tabindex="0" style=";-moz-tab-size:4;-o-tab-size:4;tab-size:4;"><code class="language-emacs-lisp" data-lang="emacs-lisp"><span style="display:flex;"><span>(<span style="color:#008000">defvar</span> <span style="color:#19177c">my/mastodon-mode-string</span> <span style="color:#ba2121">""</span>)
|
||||
</span></span><span style="display:flex;"><span>
|
||||
</span></span><span style="display:flex;"><span>(<span style="color:#008000">defvar</span> <span style="color:#19177c">my/mastodon-mode-line-unread-ids</span> <span style="color:#800">nil</span>)
|
||||
</span></span><span style="display:flex;"><span>
|
||||
</span></span><span style="display:flex;"><span>(<span style="color:#008000">defvar</span> <span style="color:#19177c">my/mastodon-mode-line-saved-ids</span> <span style="color:#800">nil</span>)
|
||||
</span></span><span style="display:flex;"><span>
|
||||
</span></span><span style="display:flex;"><span>(<span style="color:#008000">defvar</span> <span style="color:#19177c">my/mastodon-mode-line-timer</span> <span style="color:#800">nil</span>)
|
||||
</span></span><span style="display:flex;"><span>
|
||||
</span></span><span style="display:flex;"><span>(<span style="color:#008000">defvar</span> <span style="color:#19177c">my/mastodon-mode-line-file</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#00f">concat</span> <span style="color:#19177c">no-littering-var-directory</span> <span style="color:#ba2121">"mastodon/notif-ids"</span>))
|
||||
</span></span><span style="display:flex;"><span>
|
||||
</span></span><span style="display:flex;"><span>(<span style="color:#008000">defun</span> <span style="color:#19177c">my/mastodon-mode-line-load-meta</span> ()
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">when</span> (<span style="color:#00f">file-exists-p</span> <span style="color:#19177c">my/mastodon-mode-line-file</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">ignore-errors</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">with-temp-buffer</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#00f">insert-file-contents</span> <span style="color:#19177c">my/mastodon-mode-line-file</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">setq</span> <span style="color:#19177c">my/mastodon-mode-line-saved-ids</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#00f">read</span> (<span style="color:#00f">current-buffer</span>)))))))
|
||||
</span></span><span style="display:flex;"><span>
|
||||
</span></span><span style="display:flex;"><span>(<span style="color:#008000">defun</span> <span style="color:#19177c">my/mastodon-mode-line-persist-meta</span> ()
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">mkdir</span> (<span style="color:#00f">file-name-directory</span> <span style="color:#19177c">my/mastodon-mode-line-file</span>) <span style="color:#800">t</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">let</span> ((<span style="color:#19177c">coding-system-for-write</span> <span style="color:#19177c">'utf-8</span>))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">ignore-errors</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">with-temp-file</span> <span style="color:#19177c">my/mastodon-mode-line-file</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">let</span> ((<span style="color:#19177c">standard-output</span> (<span style="color:#00f">current-buffer</span>))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">print-level</span> <span style="color:#800">nil</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">print-length</span> <span style="color:#800">nil</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">print-circle</span> <span style="color:#800">nil</span>))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#00f">princ</span> <span style="color:#ba2121">";;; Mastodon Saved Notifications\n\n"</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#00f">prin1</span> <span style="color:#19177c">my/mastodon-mode-line-saved-ids</span>))))))
|
||||
</span></span><span style="display:flex;"><span>
|
||||
</span></span><span style="display:flex;"><span>(<span style="color:#008000">defun</span> <span style="color:#19177c">my/mastodon-mode-line-update</span> ()
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">if</span> <span style="color:#19177c">my/mastodon-mode-line-unread-ids</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">setq</span> <span style="color:#19177c">my/mastodon-mode-string</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#00f">concat</span> <span style="color:#ba2121">"["</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#00f">propertize</span> (<span style="color:#00f">number-to-string</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#00f">length</span> <span style="color:#19177c">my/mastodon-mode-line-unread-ids</span>))
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#19177c">'face</span> <span style="color:#19177c">'success</span>)
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#ba2121">"]"</span>))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">setq</span> <span style="color:#19177c">my/mastodon-mode-string</span> <span style="color:#ba2121">""</span>)))
|
||||
</span></span><span style="display:flex;"><span>
|
||||
</span></span><span style="display:flex;"><span>(<span style="color:#008000">defun</span> <span style="color:#19177c">my/mastodon-mode-line-update-fetch</span> ()
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">mastodon-http--get-json-async</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">mastodon-http--api</span> <span style="color:#ba2121">"notifications"</span>) <span style="color:#800">nil</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">lambda</span> (<span style="color:#19177c">data</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">let</span> ((<span style="color:#19177c">fetched-ids</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">cl-loop</span> <span style="color:#19177c">for</span> <span style="color:#19177c">datum</span> <span style="color:#19177c">in</span> <span style="color:#19177c">data</span> <span style="color:#19177c">collect</span> (<span style="color:#19177c">alist-get</span> <span style="color:#19177c">'id</span> <span style="color:#19177c">datum</span>))))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">setq</span> <span style="color:#19177c">my/mastodon-mode-line-unread-ids</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">seq-difference</span> <span style="color:#19177c">fetched-ids</span> <span style="color:#19177c">my/mastodon-mode-line-saved-ids</span>))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">setq</span> <span style="color:#19177c">my/mastodon-mode-line-saved-ids</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">seq-intersection</span> <span style="color:#19177c">my/mastodon-mode-line-saved-ids</span> <span style="color:#19177c">fetched-ids</span>)))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">my/mastodon-mode-line-update</span>))))
|
||||
</span></span><span style="display:flex;"><span>
|
||||
</span></span><span style="display:flex;"><span>(<span style="color:#008000">defun</span> <span style="color:#19177c">my/mastodon-notifications--timeline-before</span> (<span style="color:#19177c">toots</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">let*</span> ((<span style="color:#19177c">all-ids</span> (<span style="color:#19177c">seq-uniq</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#00f">append</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#19177c">my/mastodon-mode-line-saved-ids</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">cl-loop</span> <span style="color:#19177c">for</span> <span style="color:#19177c">datum</span> <span style="color:#19177c">in</span> <span style="color:#19177c">toots</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#19177c">collect</span> (<span style="color:#19177c">alist-get</span> <span style="color:#19177c">'id</span> <span style="color:#19177c">datum</span>))))))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">setq</span> <span style="color:#19177c">my/mastodon-mode-line-unread-ids</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">seq-difference</span> <span style="color:#19177c">my/mastodon-mode-line-unread-ids</span> <span style="color:#19177c">all-ids</span>))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">setq</span> <span style="color:#19177c">my/mastodon-mode-line-saved-ids</span> <span style="color:#19177c">all-ids</span>))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">my/mastodon-mode-line-update</span>))
|
||||
</span></span><span style="display:flex;"><span>
|
||||
</span></span><span style="display:flex;"><span>(<span style="color:#008000">with-eval-after-load</span> <span style="color:#19177c">'mastodon</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">define-minor-mode</span> <span style="color:#19177c">my/mastodon-mode-line</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#ba2121">"Display mastodon notification count in mode line."</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#008000">:require</span> <span style="color:#19177c">'mastodon</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#008000">:global</span> <span style="color:#800">t</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#008000">:group</span> <span style="color:#19177c">'mastodon</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#008000">:after-hook</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">progn</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">when</span> (<span style="color:#19177c">timerp</span> <span style="color:#19177c">my/mastodon-mode-line-timer</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">cancel-timer</span> <span style="color:#19177c">my/mastodon-mode-line-timer</span>))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">if</span> <span style="color:#19177c">my/mastodon-mode-line</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">progn</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">add-to-list</span> <span style="color:#19177c">'mode-line-misc-info</span> <span style="color:#666">'</span>(<span style="color:#008000">:eval</span> <span style="color:#19177c">my/mastodon-mode-string</span>) <span style="color:#800">t</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">my/mastodon-mode-line-load-meta</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">setq</span> <span style="color:#19177c">my/mastodon-mode-line-timer</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">run-with-timer</span> <span style="color:#666">0</span> <span style="color:#666">150</span> <span style="color:#00f">#'</span><span style="color:#19177c">my/mastodon-mode-line-update-fetch</span>))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">advice-add</span> <span style="color:#00f">#'</span><span style="color:#19177c">mastodon-notifications--timeline</span> <span style="color:#008000">:before</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#00f">#'</span><span style="color:#19177c">my/mastodon-notifications--timeline-before</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">add-hook</span> <span style="color:#19177c">'kill-emacs-hook</span> <span style="color:#00f">#'</span><span style="color:#19177c">my/mastodon-mode-line-persist-meta</span>))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">setq</span> <span style="color:#19177c">mode-line-misc-info</span> (<span style="color:#00f">delete</span> <span style="color:#666">'</span>(<span style="color:#008000">:eval</span> <span style="color:#19177c">my/mastodon-mode-string</span>)
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#19177c">mode-line-misc-info</span>))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">advice-remove</span> <span style="color:#00f">#'</span><span style="color:#19177c">mastodon-notifications--timeline</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#00f">#'</span><span style="color:#19177c">my/mastodon-notifications--timeline-before</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">remove-hook</span> <span style="color:#19177c">'kill-emacs-hook</span> <span style="color:#00f">#'</span><span style="color:#19177c">my/mastodon-mode-line-persist-meta</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">my/mastodon-mode-line-persist-meta</span>)))))
|
||||
</span></span></code></pre></div><h5 id="timeline-transient">Timeline Transient</h5>
|
||||
<div class="highlight"><pre tabindex="0" style=";-moz-tab-size:4;-o-tab-size:4;tab-size:4;"><code class="language-emacs-lisp" data-lang="emacs-lisp"><span style="display:flex;"><span>(<span style="color:#008000">defun</span> <span style="color:#19177c">my/mastodon-get-update-funciton</span> (<span style="color:#19177c">hide-boosts</span> <span style="color:#19177c">hide-replies</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">lambda</span> (<span style="color:#19177c">toots</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">let*</span> ((<span style="color:#19177c">is-profile</span> (<span style="color:#00f">eq</span> (<span style="color:#19177c">mastodon-tl--get-buffer-type</span>) <span style="color:#19177c">'profile-statuses</span>))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">hide-replies</span> (<span style="color:#008000">and</span> (<span style="color:#19177c">not</span> <span style="color:#19177c">is-profile</span>) <span style="color:#19177c">hide-replies</span>))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">hide-boosts</span> (<span style="color:#008000">and</span> (<span style="color:#19177c">not</span> <span style="color:#19177c">is-profile</span>) <span style="color:#19177c">hide-boosts</span>))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">toots</span> (<span style="color:#19177c">seq-filter</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">lambda</span> (<span style="color:#19177c">toot</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">and</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">or</span> (<span style="color:#19177c">not</span> <span style="color:#19177c">hide-replies</span>)
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#408080;font-style:italic">;; Why is the original function inverted??</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">mastodon-tl--is-reply</span> <span style="color:#19177c">toot</span>))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">or</span> (<span style="color:#19177c">not</span> <span style="color:#19177c">hide-boosts</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">not</span> (<span style="color:#19177c">alist-get</span> <span style="color:#19177c">'reblog</span> <span style="color:#19177c">toot</span>)))))
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#19177c">toots</span>)))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#00f">message</span> <span style="color:#ba2121">"Hide replies: %s"</span> <span style="color:#19177c">hide-replies</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#00f">message</span> <span style="color:#ba2121">"Hide boosts: %s"</span> <span style="color:#19177c">hide-boosts</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#00f">message</span> <span style="color:#ba2121">"Buffer: %s"</span> (<span style="color:#00f">buffer-name</span>))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#00f">mapc</span> <span style="color:#00f">#'</span><span style="color:#19177c">mastodon-tl--toot</span> <span style="color:#19177c">toots</span>))))
|
||||
</span></span></code></pre></div><div class="highlight"><pre tabindex="0" style=";-moz-tab-size:4;-o-tab-size:4;tab-size:4;"><code class="language-emacs-lisp" data-lang="emacs-lisp"><span style="display:flex;"><span>(<span style="color:#008000">defun</span> <span style="color:#19177c">my/mastodon-tl--get-home</span> (<span style="color:#19177c">hide-replies</span> <span style="color:#19177c">hide-boosts</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">mastodon-tl--init</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#ba2121">"home"</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#ba2121">"timelines/home"</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">my/mastodon-get-update-funciton</span> <span style="color:#19177c">hide-replies</span> <span style="color:#19177c">hide-boosts</span>)
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#800">nil</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#666">`</span>((<span style="color:#ba2121">"limit"</span> <span style="color:#666">.</span> <span style="color:#666">,</span><span style="color:#19177c">mastodon-tl--timeline-posts-count</span>))
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#800">nil</span>))
|
||||
</span></span></code></pre></div><div class="highlight"><pre tabindex="0" style=";-moz-tab-size:4;-o-tab-size:4;tab-size:4;"><code class="language-emacs-lisp" data-lang="emacs-lisp"><span style="display:flex;"><span>(<span style="color:#008000">with-eval-after-load</span> <span style="color:#19177c">'mastodon</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">require</span> <span style="color:#19177c">'transient</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">transient-define-prefix</span> <span style="color:#19177c">my/mastodon-tl</span> ()
|
||||
</span></span><span style="display:flex;"><span> [<span style="color:#ba2121">"Home timeline params"</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"-r"</span> <span style="color:#ba2121">"--hide-replies"</span> <span style="color:#ba2121">"--hide-replies"</span> <span style="color:#008000">:init-value</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">lambda</span> (<span style="color:#19177c">obj</span>) (<span style="color:#008000">oset</span> <span style="color:#19177c">obj</span> <span style="color:#19177c">value</span> <span style="color:#ba2121">"--hide-replies"</span>)))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"-b"</span> <span style="color:#ba2121">"--hide-boosts"</span> <span style="color:#ba2121">"--hide-boosts"</span> <span style="color:#008000">:init-value</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">lambda</span> (<span style="color:#19177c">obj</span>) (<span style="color:#008000">oset</span> <span style="color:#19177c">obj</span> <span style="color:#19177c">value</span> <span style="color:#ba2121">"--hide-boosts"</span>)))]
|
||||
</span></span><span style="display:flex;"><span> [<span style="color:#ba2121">"Timelines"</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#008000">:class</span> <span style="color:#19177c">transient-row</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"t"</span> <span style="color:#ba2121">"Home"</span> (<span style="color:#008000">lambda</span> (<span style="color:#19177c">args</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#008000">interactive</span> (<span style="color:#00f">list</span> (<span style="color:#19177c">transient-args</span> <span style="color:#19177c">transient-current-command</span>)))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">my/mastodon-tl--get-home</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">seq-contains-p</span> <span style="color:#19177c">args</span> <span style="color:#ba2121">"--hide-replies"</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">seq-contains-p</span> <span style="color:#19177c">args</span> <span style="color:#ba2121">"--hide-boosts"</span>))))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"l"</span> <span style="color:#ba2121">"Local"</span> <span style="color:#19177c">mastodon-tl--get-local-timeline</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"f"</span> <span style="color:#ba2121">"Federated"</span> <span style="color:#19177c">mastodon-tl--get-federated-timeline</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"g"</span> <span style="color:#ba2121">"One tag"</span> <span style="color:#19177c">mastodon-tl--get-tag-timeline</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"a"</span> <span style="color:#ba2121">"Followed tags"</span> <span style="color:#19177c">mastodon-tl--followed-tags-timeline</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"s"</span> <span style="color:#ba2121">"Some followed tags"</span> <span style="color:#19177c">mastodon-tl--some-followed-tags-timeline</span>)]
|
||||
</span></span><span style="display:flex;"><span> [<span style="color:#ba2121">"Misc"</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#008000">:class</span> <span style="color:#19177c">transient-row</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"q"</span> <span style="color:#ba2121">"Quit"</span> <span style="color:#19177c">transient-quit-one</span>)]))
|
||||
</span></span></code></pre></div><h5 id="main-transient">Main Transient</h5>
|
||||
<p>Also, there are so many commands that it’s hard to remember all of them. So I define two transient prefixes.</p>
|
||||
<p>The first dispatches “general” actions:</p>
|
||||
|
|
@ -6976,25 +7118,14 @@ Didn’t work out as I expected, so I’ve made <code>org-journal-tags</
|
|||
</span></span><span style="display:flex;"><span> [<span style="color:#ba2121">"Various views"</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#008000">:class</span> <span style="color:#19177c">transient-row</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"m"</span> <span style="color:#ba2121">"Mastodon"</span> <span style="color:#19177c">mastodon</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"t"</span> <span style="color:#ba2121">"Timelines"</span> <span style="color:#19177c">my/mastodon-tl</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"n"</span> <span style="color:#ba2121">"Notifications"</span> <span style="color:#19177c">mastodon-notifications-get</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">":"</span> <span style="color:#ba2121">"Followed tags"</span> <span style="color:#19177c">mastodon-tl--list-followed-tags</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"s"</span> <span style="color:#ba2121">"Search query"</span> <span style="color:#19177c">mastodon-search--search-query</span>)]
|
||||
</span></span><span style="display:flex;"><span> [<span style="color:#ba2121">"Timelines"</span>
|
||||
</span></span><span style="display:flex;"><span> [<span style="color:#ba2121">"Tags"</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#008000">:class</span> <span style="color:#19177c">transient-row</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"tt"</span> <span style="color:#ba2121">"Home"</span> <span style="color:#19177c">mastodon-tl--get-home-timeline</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"tT"</span> <span style="color:#ba2121">"Home (no replies)"</span> (<span style="color:#008000">lambda</span> () (<span style="color:#008000">interactive</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#19177c">mastodon-tl--get-home-timeline</span> <span style="color:#666">4</span>)))
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"tl"</span> <span style="color:#ba2121">"Local"</span> <span style="color:#19177c">mastodon-tl--get-local-timeline</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"tf"</span> <span style="color:#ba2121">"Federated"</span> <span style="color:#19177c">mastodon-tl--get-federated-timeline</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"tg"</span> <span style="color:#ba2121">"One tag"</span> <span style="color:#19177c">mastodon-tl--get-tag-timeline</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"ta"</span> <span style="color:#ba2121">"Followed tags"</span> <span style="color:#19177c">mastodon-tl--followed-tags-timeline</span>)]
|
||||
</span></span><span style="display:flex;"><span> [<span style="color:#ba2121">"Own profile"</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#008000">:class</span> <span style="color:#19177c">transient-row</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"c"</span> <span style="color:#ba2121">"Toot"</span> <span style="color:#19177c">mastodon-toot</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"o"</span> <span style="color:#ba2121">"My profile"</span> <span style="color:#19177c">mastodon-profile--my-profile</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"u"</span> <span style="color:#ba2121">"Update profile note"</span> <span style="color:#19177c">mastodon-profile--update-user-profile-note</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"f"</span> <span style="color:#ba2121">"Favourites"</span> <span style="color:#19177c">mastodon-profile--view-favourites</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"b"</span> <span style="color:#ba2121">"Bookmarks"</span> <span style="color:#19177c">mastodon-profile--view-bookmarks</span>)]
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"aa"</span> <span style="color:#ba2121">"Followed tags"</span> <span style="color:#19177c">mastodon-tl--list-followed-tags</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"af"</span> <span style="color:#ba2121">"Follow tag"</span> <span style="color:#19177c">mastodon-tl--follow-tag</span>)
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"aF"</span> <span style="color:#ba2121">"Unfollow tag"</span> <span style="color:#19177c">mastodon-tl--unfollow-tag</span>)]
|
||||
</span></span><span style="display:flex;"><span> [<span style="color:#ba2121">"Own profile"</span>
|
||||
</span></span><span style="display:flex;"><span> <span style="color:#008000">:class</span> <span style="color:#19177c">transient-row</span>
|
||||
</span></span><span style="display:flex;"><span> (<span style="color:#ba2121">"c"</span> <span style="color:#ba2121">"Toot"</span> <span style="color:#19177c">mastodon-toot</span>)
|
||||
|
|
|
|||
BIN
stats/all.png
BIN
stats/all.png
Binary file not shown.
|
Before Width: | Height: | Size: 118 KiB After Width: | Height: | Size: 118 KiB |
Binary file not shown.
|
Before Width: | Height: | Size: 61 KiB After Width: | Height: | Size: 61 KiB |
Binary file not shown.
|
Before Width: | Height: | Size: 64 KiB After Width: | Height: | Size: 64 KiB |
Loading…
Add table
Reference in a new issue