Merge branch 'main' of git.sr.ht:~marcuskammer/emacs.d

bundle/bundle--package.el

@@ -48,7 +48,7 @@
   (ivy-mode 1))
 
 (use-package olivetti
-  :custom (olivetti-body-width 82))
+  :custom (olivetti-body-width 89))
 
 (use-package shrface
   :config
@@ -71,7 +71,12 @@
 
 (use-package nov
   :hook (nov-mode . olivetti-mode)
+  :init
+  (add-hook 'nov-mode-hook #'shrface-mode)
   :config
+  (require 'shrface)
+  (setq nov-shr-rendering-functions '((img . nov-render-img) (title . nov-render-title)))
+  (setq nov-shr-rendering-functions (append nov-shr-rendering-functions shr-external-rendering-functions))
   (setq nov-text-width nil
         nov-variable-pitch nil))
 
@@ -316,4 +321,9 @@
                                 "https://de.wikipedia.org/wiki/" ""]))
            webjump-sample-sites)))
 
-(use-package plantuml-mode)
+(use-package plantuml-mode
+    :mode "\\.puml?\\'")
+
+(use-package unicode-fonts
+   :config
+    (unicode-fonts-setup))

bundle/custom_win32_EVG02667NB.el

@@ -11,13 +11,15 @@
    ["#21252B" "#E06C75" "#98C379" "#E5C07B" "#61AFEF" "#C678DD" "#56B6C2" "#ABB2BF"])
  '(backup-directory-alist '(("." . "~/.backup_filez")))
  '(beacon-color "#d54e53")
+ '(bookmark-default-file "~/emacs-bookmarks")
  '(company-quickhelp-color-background "#4F4F4F")
  '(company-quickhelp-color-foreground "#DCDCCC")
  '(default-frame-alist
-    '((font . "Fira Code-12")
+    '((font . "Fira Code-11")
       (width . 91)
       (height . 60)
-      (alpha . 100)))
+      (alpha . 100)
+      (vertical-scroll-bars)))
  '(delete-by-moving-to-trash t)
  '(diary-file
    "d:/UserData/marcus.kammer/OneDrive - Siemens AG/documents/Diary/diary")
@@ -47,7 +49,7 @@
      ("\\?\\?\\?+" . "#dc752f")))
  '(initial-buffer-choice
    "d:/UserData/marcus.kammer/OneDrive - Siemens AG/documents/Journal/notes.org")
- '(initial-frame-alist '((vertical-scroll-bars) (fullscreen . fullscreen)))
+ '(initial-frame-alist '((fullscreen . maximized)))
  '(ispell-program-name "~/AppData/Local/Programs/msys64/mingw64/bin/aspell.exe")
  '(ls-lisp-dirs-first t)
  '(mouse-wheel-scroll-amount '(1 ((shift) . 1) ((meta)) ((control) . text-scale)))
@@ -63,7 +65,7 @@
    '(ol-bbdb ol-bibtex ol-docview ol-eww ol-gnus ol-info ol-irc ol-mhe ol-rmail org-tempo ol-w3m))
  '(org-plantuml-jar-path "~/AppData/Local/Programs/plantuml/plantuml.jar")
  '(package-selected-packages
-   '(rust-mode org-web-tools emojify erc-image slime-company shrface helpful eglot xref yaml-mode webpaste web-mode use-package typescript-mode slime rainbow-delimiters racket-mode projectile powershell ox-reveal org-tree-slide olivetti ob-typescript ob-rust ob-http ob-go nov markdown-mode magit go-mode geiser-racket elpy eldoc doom-themes doom-modeline counsel all-the-icons-dired ace-window))
+   '(unicode-fonts plantuml-mode rust-mode org-web-tools emojify erc-image slime-company shrface helpful eglot xref yaml-mode webpaste web-mode use-package typescript-mode slime rainbow-delimiters racket-mode projectile powershell ox-reveal org-tree-slide olivetti ob-typescript ob-rust ob-http ob-go nov markdown-mode magit go-mode geiser-racket elpy eldoc doom-themes doom-modeline counsel all-the-icons-dired ace-window))
  '(pdf-view-midnight-colors '("#b2b2b2" . "#292b2e"))
  '(plantuml-default-exec-mode 'jar)
  '(plantuml-jar-path "~/AppData/Local/Programs/plantuml/plantuml.jar")

eww-bookmarks

@@ -1,6 +1,7 @@
 ;; Auto-generated file; don't edit
 ((:url "https://emacsredux.com/blog/2020/12/11/super-keybindings-for-magit/" :title "Super Keybindings for Magit | Emacs Redux" :time "Wed Jun 16 17:04:48 2021")
  (:url "https://common-lisp.net/project/asdf/asdf/" :title "Top (ASDF Manual)" :time "Sat Jun 12 13:03:40 2021")
+ (:url "https://sachachua.com/blog/" :title "Home :: Sacha Chua" :time "Thu Jun 10 15:12:50 2021")
  (:url "https://www3.ntu.edu.sg/home/ehchua/programming/webprogramming/HTTP_Basics.html" :title "In Introduction to HTTP Basics" :time "Tue Jun  8 16:07:52 2021")
  (:url "https://doc.rust-lang.org/stable/book/" :title "The Rust Programming Language - The Rust Programming Language" :time "Mon Jun  7 18:56:46 2021")
  (:url "https://www.emacswiki.org/emacs/SiteMap" :title "EmacsWiki: Site Map" :time "Mon Jun  7 18:06:58 2021")

library-of-babel.org

@@ -679,3 +679,28 @@ this default behavior.  Below is a list of such options:
 
      print(*org_list(unique(authors(commits(repo)))))
    #+end_src
+
+** Show gitlab issues
+   #+name: gitlab-issues
+   #+begin_src python
+     import requests
+     import feedparser
+
+
+     def show_issues(URL):
+         issues = []
+         states = ['&label_name[]=Doing',
+                   '&label_name[]=Ready',
+                   '&label_name[]=In Progress']
+         for state in states:
+             full_url = URL + state
+             response = requests.get(full_url)
+             feed = feedparser.parse(response.text)
+             for entry in feed.entries:
+                 _id = entry['id'].split('/')[-1]
+                 _url = entry['id']
+                 _title = entry['title']
+                 issues.append(f"[[{_url}][{_title} ({_id})]]")
+         for issue in issues:
+             print(issue)
+   #+end_src