seasharp/Rosenthal
1
0
Fork 0
mirror of https://codeberg.org/hako/Rosenthal.git synced 2025-11-03 19:24:37 +00:00
Code Issues Packages Projects Releases Wiki Activity

rosenthal: Unify comments style.

Browse Source
This commit is contained in:
Hilton Chain 2025-08-07 17:08:21 +08:00
parent 4a20afc025
commit 40d6224034
No known key found for this signature in database
GPG Key ID: ACC66D09CA528292
29 changed files with 138 additions and 138 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
.guix-authorizations
View File

@ -1,7 +1,7 @@
;; -*- mode: scheme -*- ;;; -*- mode: scheme -*-
;; SPDX-FileCopyrightText: 2022, 2024 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2022, 2024 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: CC0-1.0 ;;; SPDX-License-Identifier: CC0-1.0
(authorizations (authorizations
(version 0) (version 0)

6
modules/guix/import/rosenthal-updaters.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2024, 2025 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2024, 2025 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (guix import rosenthal-updaters) (define-module (guix import rosenthal-updaters)
#:use-module (srfi srfi-71) #:use-module (srfi srfi-71)

6
modules/rosenthal/bootloader/grub.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2023 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2023 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal bootloader grub) (define-module (rosenthal bootloader grub)
#:use-module (gnu bootloader) #:use-module (gnu bootloader)

8
modules/rosenthal/examples/emacs/fonts.el
View File

@ -1,8 +1,8 @@
;;; -*- lexical-binding: t -*- ;;; -*- lexical-binding: t -*-
;; SPDX-FileCopyrightText: DogLooksGood <doglooksgood@hotmail.com> ;;; SPDX-FileCopyrightText: DogLooksGood <doglooksgood@hotmail.com>
;; SPDX-FileCopyrightText: 2022 Nyk Ma <i@nyk.ma> ;;; SPDX-FileCopyrightText: 2022 Nyk Ma <i@nyk.ma>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
;; https://github.com/DogLooksGood/meomacs/blob/master/laf.org ;; https://github.com/DogLooksGood/meomacs/blob/master/laf.org
;; https://github.com/nykma/nema/blob/develop/my-sample/font.el ;; https://github.com/nykma/nema/blob/develop/my-sample/font.el

8
modules/rosenthal/packages/admin.scm
View File

@ -1,7 +1,7 @@
;; SPDX-FileCopyrightText: 2022, 2025 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2022, 2025 Hilton Chain <hako@ultrarare.space>
;; SPDX-FileCopyrightText: 2025 William Goodspeed ;;; SPDX-FileCopyrightText: 2025 William Goodspeed
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal packages admin) (define-module (rosenthal packages admin)
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)

6
modules/rosenthal/packages/binaries.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2023-2024 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2023-2024 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal packages binaries) (define-module (rosenthal packages binaries)
#:use-module (srfi srfi-1) #:use-module (srfi srfi-1)

6
modules/rosenthal/packages/bootloaders.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2023 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2023 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal packages bootloaders) (define-module (rosenthal packages bootloaders)
#:use-module (guix download) #:use-module (guix download)

6
modules/rosenthal/packages/browser-extensions.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2023-2025 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2023-2025 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal packages browser-extensions) (define-module (rosenthal packages browser-extensions)
#:use-module (srfi srfi-1) #:use-module (srfi srfi-1)

6
modules/rosenthal/packages/busybox.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2022 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2022 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal packages busybox) (define-module (rosenthal packages busybox)
#:use-module (guix gexp) #:use-module (guix gexp)

6
modules/rosenthal/packages/ci.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2025 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2025 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal packages ci) (define-module (rosenthal packages ci)
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)

6
modules/rosenthal/packages/dns.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2022-2024 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2022-2024 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal packages dns) (define-module (rosenthal packages dns)
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)

6
modules/rosenthal/packages/emacs-xyz.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2022-2024 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2022-2024 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal packages emacs-xyz) (define-module (rosenthal packages emacs-xyz)
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)

6
modules/rosenthal/packages/networking.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2022-2024 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2022-2024 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal packages networking) (define-module (rosenthal packages networking)
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)

6
modules/rosenthal/packages/password-utils.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2025 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2025 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal packages password-utils) (define-module (rosenthal packages password-utils)
#:use-module (guix gexp) #:use-module (guix gexp)

6
modules/rosenthal/packages/rust-apps.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2025 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2025 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal packages rust-apps) (define-module (rosenthal packages rust-apps)
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)

6
modules/rosenthal/packages/ssh.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2022 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2022 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal packages ssh) (define-module (rosenthal packages ssh)
#:use-module (guix gexp) #:use-module (guix gexp)

6
modules/rosenthal/packages/tree-sitter.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2023 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2023 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal packages tree-sitter) (define-module (rosenthal packages tree-sitter)
#:use-module (guix gexp) #:use-module (guix gexp)

6
modules/rosenthal/packages/video.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2022 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2022 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal packages video) (define-module (rosenthal packages video)
#:use-module (guix gexp) #:use-module (guix gexp)

6
modules/rosenthal/packages/web.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2022, 2025 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2022, 2025 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal packages web) (define-module (rosenthal packages web)
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)

6
modules/rosenthal/packages/wm.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2025 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2025 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal packages wm) (define-module (rosenthal packages wm)
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)

6
modules/rosenthal/packages/xorg.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2025 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2025 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal packages xorg) (define-module (rosenthal packages xorg)
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)

12
modules/rosenthal/services/bittorrent.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2022, 2023 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2022, 2023 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal services bittorrent) (define-module (rosenthal services bittorrent)
#:use-module (ice-9 format) #:use-module (ice-9 format)
@ -18,9 +18,9 @@
qbittorrent-service-type qbittorrent-service-type
home-qbittorrent-service-type)) home-qbittorrent-service-type))
;; ;;;
;; qBittorrent ;;; qBittorrent
;; ;;;
(define-configuration qbittorrent-configuration (define-configuration qbittorrent-configuration

48
modules/rosenthal/services/child-error.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2022, 2023 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2022, 2023 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal services child-error) (define-module (rosenthal services child-error)
#:use-module (guix records) #:use-module (guix records)
@ -42,9 +42,9 @@
home-socks2http-configuration home-socks2http-configuration
home-socks2http-service-type)) home-socks2http-service-type))
;; ;;;
;; Clash ;;; Clash
;; ;;;
(define-configuration clash-configuration (define-configuration clash-configuration
@ -122,9 +122,9 @@
(description "Run Clash."))) (description "Run Clash.")))
;; ;;;
;; Cloudflare Tunnel ;;; Cloudflare Tunnel
;; ;;;
(define-maybe string) (define-maybe string)
@ -213,9 +213,9 @@ headers. This can expose sensitive information in your logs.")
(description "Run cloudflared, the Cloudflare Tunnel daemon."))) (description "Run cloudflared, the Cloudflare Tunnel daemon.")))
;; ;;;
;; Cloudflare Warp ;;; Cloudflare Warp
;; ;;;
(define-configuration cloudflare-warp-configuration (define-configuration cloudflare-warp-configuration
@ -250,9 +250,9 @@ headers. This can expose sensitive information in your logs.")
(description "Run warp-svc, the Cloudflare Warp daemon."))) (description "Run warp-svc, the Cloudflare Warp daemon.")))
;; ;;;
;; Miniflux ;;; Miniflux
;; ;;;
(define-maybe string) (define-maybe string)
@ -326,9 +326,9 @@ headers. This can expose sensitive information in your logs.")
(description "Run Miniflux, a minimalist and opinionated feed reader."))) (description "Run Miniflux, a minimalist and opinionated feed reader.")))
;; ;;;
;; Wakapi ;;; Wakapi
;; ;;;
(define-configuration home-wakapi-configuration (define-configuration home-wakapi-configuration
@ -365,9 +365,9 @@ headers. This can expose sensitive information in your logs.")
(description "Run Wakapi, a self-hosted WakaTime-compatible backend."))) (description "Run Wakapi, a self-hosted WakaTime-compatible backend.")))
;; ;;;
;; ShadowTLS ;;; ShadowTLS
;; ;;;
(define-maybe list-of-strings (define-maybe list-of-strings
@ -524,9 +524,9 @@ is @code{443} by default")
(default-value (for-home (shadow-tls-configuration))))) (default-value (for-home (shadow-tls-configuration)))))
;; ;;;
;; Socks2http ;;; Socks2http
;; ;;;
(define-configuration home-socks2http-configuration (define-configuration home-socks2http-configuration

12
modules/rosenthal/services/dns.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2022, 2023 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2022, 2023 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal services dns) (define-module (rosenthal services dns)
#:use-module (guix gexp) #:use-module (guix gexp)
@ -12,9 +12,9 @@
#:export (smartdns-configuration #:export (smartdns-configuration
smartdns-service-type)) smartdns-service-type))
;; ;;;
;; Smartdns ;;; Smartdns
;; ;;;
(define-configuration smartdns-configuration (define-configuration smartdns-configuration

12
modules/rosenthal/services/file-systems.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2024 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2024 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal services file-systems) (define-module (rosenthal services file-systems)
#:use-module (guix gexp) #:use-module (guix gexp)
@ -16,9 +16,9 @@
dumb-runtime-dir-service-type)) dumb-runtime-dir-service-type))
;; ;;;
;; Btrbk ;;; Btrbk
;; ;;;
(define-configuration btrbk-configuration (define-configuration btrbk-configuration

6
modules/rosenthal/services/mail.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2024 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2024 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal services mail) (define-module (rosenthal services mail)
#:use-module (srfi srfi-26) #:use-module (srfi srfi-26)

18
modules/rosenthal/services/networking.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2023 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2023 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal services networking) (define-module (rosenthal services networking)
#:use-module (srfi srfi-1) #:use-module (srfi srfi-1)
@ -21,9 +21,9 @@
tailscale-configuration tailscale-configuration
tailscale-service-type)) tailscale-service-type))
;; ;;;
;; iwd ;;; iwd
;; ;;;
(define %iwd-config-general (define %iwd-config-general
@ -378,9 +378,9 @@ list, power save will be disabled."))
(description "Run iwd, the iNet wireless daemon."))) (description "Run iwd, the iNet wireless daemon.")))
;; ;;;
;; Tailscale ;;; Tailscale
;; ;;;
(define-configuration tailscale-configuration (define-configuration tailscale-configuration

30
modules/rosenthal/services/web.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2024 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2024 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal services web) (define-module (rosenthal services web)
#:use-module (guix gexp) #:use-module (guix gexp)
@ -125,9 +125,9 @@
;; ;;;
;; Forgejo ;;; Forgejo
;; ;;;
(define (file-object? val) (define (file-object? val)
@ -218,9 +218,9 @@
(description "Run Forgejo."))) (description "Run Forgejo.")))
;; ;;;
;; Jellyfin ;;; Jellyfin
;; ;;;
(define-maybe string) (define-maybe string)
@ -362,9 +362,9 @@
(description "Run Komga."))) (description "Run Komga.")))
;; ;;;
;; Misskey ;;; Misskey
;; ;;;
(define-configuration misskey-configuration (define-configuration misskey-configuration
@ -512,9 +512,9 @@
(description "Run Navidrome."))) (description "Run Navidrome.")))
;; ;;;
;; Vaultwarden ;;; Vaultwarden
;; ;;;
(define-configuration vaultwarden-configuration (define-configuration vaultwarden-configuration

6
modules/rosenthal/utils/download.scm
View File

@ -1,6 +1,6 @@
;; SPDX-FileCopyrightText: 2025 Hilton Chain <hako@ultrarare.space> ;;; SPDX-FileCopyrightText: 2025 Hilton Chain <hako@ultrarare.space>
;; ;;;
;; SPDX-License-Identifier: GPL-3.0-or-later ;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (rosenthal utils download) (define-module (rosenthal utils download)
#:use-module (guix gexp) #:use-module (guix gexp)