diff --git a/authinfo.gpg b/authinfo.gpg index af76309..4b00365 100644 Binary files a/authinfo.gpg and b/authinfo.gpg differ diff --git a/config.org b/config.org index bdfbc05..be4a4ca 100644 --- a/config.org +++ b/config.org @@ -476,6 +476,15 @@ Sometimes (most often a work) I share my screen during a video call to discuss s (set-face-attribute 'fixed-pitch nil :font mmk2410/fixed-font-name :height mmk2410/fixed-font-present-height :weight 'regular)) #+end_src +Additionally like to adjust some faces to my personal liking. + +#+begin_src emacs-lisp + (with-eval-after-load 'elfeed + (set-face-attribute 'message-header-subject nil + :font mmk2410/variable-font-name + :height 220)) +#+end_src + ** Set theme Installing and enabling Gruvbox light theme. /Disabled in favor of the Doom themes./ @@ -1914,8 +1923,6 @@ Source: [[https://github.com/joaotavora/eglot][GitHub:joaotavora/eglot]] #+begin_src emacs-lisp (use-package eglot - :config - (add-to-list 'eglot-server-programs '(php-mode . ("~/.local/bin/phpactor" "language-server"))) :hook ((python-mode . eglot-ensure) (go-mode . eglot-ensure) (php-mode . eglot-ensure) @@ -2257,14 +2264,8 @@ Source: [[https://github.com/skeeto/elfeed][GitHub: skeeto/elfeed]] #+begin_src emacs-lisp (use-package elfeed :demand t - :config - (setq elfeed-sort-order 'ascending) - (defun my/elfeed-search-toggle-star () - (interactive) - (elfeed-search-toggle-all 'star)) - :bind (("C-c e" . elfeed) - :map elfeed-search-mode-map - ("f" . my/elfeed-search-toggle-star))) + :config (setq elfeed-sort-order 'ascending) + :bind (("C-c e" . elfeed))) #+end_src ** Storing articles diff --git a/packages/scribbles.el b/packages/scribbles.el deleted file mode 100644 index 3d6087d..0000000 --- a/packages/scribbles.el +++ /dev/null @@ -1,29 +0,0 @@ -;;; scribbles.el --- Scribbles Integration -*- lexical-binding: t -*- - -;;; Commentary: -;;; Integration with my Scribbles microblog on mmk2410.org - -;;; Code: -(require 'json) -(require 'plz) - -(defun scribbles--get-api-key () - "Get Scribbles API key from auth store." - (let ((result (auth-source-search :host "mmk2410.org" :user "scribbles"))) - (if result - (funcall (plist-get (car result) :secret)) - nil))) - -(defun scribbles--build-headers () - "Build headers for Scribbles Lab API request." - `(("Content-Type" . "application/json") - ("Api-Key" . ,(scribbles--get-api-key)))) - -(defun scribbles-post (message) - "Post MESSAGE to Scribbles." - (interactive "sScribble: ") - (plz 'post "https://mmk2410.org/my/api/v1/scribble" - :headers (scribbles--build-headers) - :body (json-encode `(("text" . ,message))))) - -;;; scribbles.el ends here