ryuslash/dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Reindent all package descriptions

Browse source
This commit is contained in:
Tom Willemse 2022-11-17 20:57:06 -08:00
parent 419aaab627
commit 1df69d56d8
9 changed files with 254 additions and 254 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

56
oni/packages/count-emails.scm
View file

@ -12,31 +12,31 @@
(let ((commit "66165bdecea54888967fcc6a8c29a3df09a18256") (let ((commit "66165bdecea54888967fcc6a8c29a3df09a18256")
(revision "0")) (revision "0"))
(package (package
(name "count-emails") (name "count-emails")
(version (git-version "0.0.0" revision commit)) (version (git-version "0.0.0" revision commit))
(source (source
(origin (origin
(uri (git-reference (uri (git-reference
(url "git://ryuslash.org/util/tom/count-emails") (url "git://ryuslash.org/util/tom/count-emails")
(commit commit))) (commit commit)))
(method git-fetch) (method git-fetch)
(sha256 (sha256
(base32 "0pv4wbxbg0szs2jiskmxvivrq44ha5ljdn18j3j2pi8q1dp9rmb3")) (base32 "0pv4wbxbg0szs2jiskmxvivrq44ha5ljdn18j3j2pi8q1dp9rmb3"))
(file-name (git-file-name name version)))) (file-name (git-file-name name version))))
(propagated-inputs (propagated-inputs
(list scsh notmuch)) (list scsh notmuch))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:tests? #f `(#:tests? #f
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(delete 'configure) (delete 'configure)
(delete 'build) (delete 'build)
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((bin (string-append (assoc-ref outputs "out") "/bin"))) (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
(install-file "count-emails" bin))))))) (install-file "count-emails" bin)))))))
(home-page "https://ryuslash.org/") (home-page "https://ryuslash.org/")
(synopsis "A simple script that counts the number of unread emails.") (synopsis "A simple script that counts the number of unread emails.")
(description "Counts the number of unread emails.") (description "Counts the number of unread emails.")
(license license:gpl3+)))) (license license:gpl3+))))

56
oni/packages/hlwm-run-or-raise.scm
View file

@ -13,31 +13,31 @@
(let ((commit "deda13603d44e0a0aaab5a5f94f103864c64f257") (let ((commit "deda13603d44e0a0aaab5a5f94f103864c64f257")
(revision "0")) (revision "0"))
(package (package
(name "hlwm-run-or-raise") (name "hlwm-run-or-raise")
(version (git-version "0.0.0" revision commit)) (version (git-version "0.0.0" revision commit))
(source (source
(origin (origin
(uri (git-reference (uri (git-reference
(url "git://ryuslash.org/util/tom/hlwm-run-or-raise.git") (url "git://ryuslash.org/util/tom/hlwm-run-or-raise.git")
(commit commit))) (commit commit)))
(method git-fetch) (method git-fetch)
(sha256 (sha256
(base32 "12z44bk68pyiyl44hfhb1p85fy968p0x7qqjmzh8na0p8lah4x01")) (base32 "12z44bk68pyiyl44hfhb1p85fy968p0x7qqjmzh8na0p8lah4x01"))
(file-name (git-file-name name version)))) (file-name (git-file-name name version))))
(propagated-inputs (propagated-inputs
(list wmctrl gawk grep hlwm-switch-to-window scsh)) (list wmctrl gawk grep hlwm-switch-to-window scsh))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:tests? #f ; There is no test suite. `(#:tests? #f ; There is no test suite.
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(delete 'configure) (delete 'configure)
(delete 'build) (delete 'build)
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((bin (string-append (assoc-ref outputs "out") "/bin"))) (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
(install-file "hlwm-run-or-raise" bin))))))) (install-file "hlwm-run-or-raise" bin)))))))
(home-page "https://ryuslash.org/") (home-page "https://ryuslash.org/")
(synopsis "A simple script that either starts a program or switches to it with herbstluftwm.") (synopsis "A simple script that either starts a program or switches to it with herbstluftwm.")
(description "Can be bound to a key to either switch to a program or start it up if it isn't running.") (description "Can be bound to a key to either switch to a program or start it up if it isn't running.")
(license license:gpl3+)))) (license license:gpl3+))))

56
oni/packages/hlwm-switch-to-window.scm
View file

@ -9,31 +9,31 @@
(let ((commit "9001a3391f17aa71cc299be8bc8ffadbb9b9ac12") (let ((commit "9001a3391f17aa71cc299be8bc8ffadbb9b9ac12")
(revision "0")) (revision "0"))
(package (package
(name "hlwm-switch-to-window") (name "hlwm-switch-to-window")
(version (git-version "0.0.0" revision commit)) (version (git-version "0.0.0" revision commit))
(source (source
(origin (origin
(uri (git-reference (uri (git-reference
(url "git://ryuslash.org/util/tom/hlwm-switch-to-window.git") (url "git://ryuslash.org/util/tom/hlwm-switch-to-window.git")
(commit commit))) (commit commit)))
(method git-fetch) (method git-fetch)
(sha256 (sha256
(base32 "153rw46012pvbq624hwmfdfv36wl12g7m87vdf1nv4kp91am1nkm")) (base32 "153rw46012pvbq624hwmfdfv36wl12g7m87vdf1nv4kp91am1nkm"))
(file-name (git-file-name name version)))) (file-name (git-file-name name version))))
(propagated-inputs (propagated-inputs
(list herbstluftwm)) (list herbstluftwm))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:tests? #f `(#:tests? #f
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(delete 'configure) (delete 'configure)
(delete 'build) (delete 'build)
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((bin (string-append (assoc-ref outputs "out") "/bin"))) (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
(install-file "hlwm-switch-to-window" bin))))))) (install-file "hlwm-switch-to-window" bin)))))))
(home-page "https://ryuslash.org/") (home-page "https://ryuslash.org/")
(synopsis "A simple script that checks which monitor to use to switch to a window before switching.") (synopsis "A simple script that checks which monitor to use to switch to a window before switching.")
(description "Can be bound to a key to make sure that when you switch to a window a specific monitor is always used.") (description "Can be bound to a key to make sure that when you switch to a window a specific monitor is always used.")
(license license:gpl3+)))) (license license:gpl3+))))

56
oni/packages/inbox-size.scm
View file

@ -11,31 +11,31 @@
(let ((commit "e9a94db05e45be9357ccc757601c1cd890a6254c") (let ((commit "e9a94db05e45be9357ccc757601c1cd890a6254c")
(revision "0")) (revision "0"))
(package (package
(name "inbox-size") (name "inbox-size")
(version (git-version "0.0.0" revision commit)) (version (git-version "0.0.0" revision commit))
(source (source
(origin (origin
(uri (git-reference (uri (git-reference
(url "git://ryuslash.org/util/tom/inbox-size") (url "git://ryuslash.org/util/tom/inbox-size")
(commit commit))) (commit commit)))
(method git-fetch) (method git-fetch)
(sha256 (sha256
(base32 "09mjxk85cqvcxk5n51izfqap36pjd35z476fmvd5vq7d5kgnczzw")) (base32 "09mjxk85cqvcxk5n51izfqap36pjd35z476fmvd5vq7d5kgnczzw"))
(file-name (git-file-name name version)))) (file-name (git-file-name name version))))
(propagated-inputs (propagated-inputs
(list bash scsh emacs)) (list bash scsh emacs))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:tests? #f `(#:tests? #f
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(delete 'configure) (delete 'configure)
(delete 'build) (delete 'build)
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((bin (string-append (assoc-ref outputs "out") "/bin"))) (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
(install-file "inbox-size" bin))))))) (install-file "inbox-size" bin)))))))
(home-page "https://ryuslash.org/") (home-page "https://ryuslash.org/")
(synopsis "A simple script that checks the size of my GTD inbox.") (synopsis "A simple script that checks the size of my GTD inbox.")
(description "Counts the number of items in my GTD inbox.") (description "Counts the number of items in my GTD inbox.")
(license license:gpl3+)))) (license license:gpl3+))))

60
oni/packages/mpd-random-albums.scm
View file

@ -12,33 +12,33 @@
(let ((commit "c12a766e1920e726129dfd1161a2ef15471f89e8") (let ((commit "c12a766e1920e726129dfd1161a2ef15471f89e8")
(revision "0")) (revision "0"))
(package (package
(name "mpd-random-albums") (name "mpd-random-albums")
(version (git-version "0.0.0" revision commit)) (version (git-version "0.0.0" revision commit))
(source (source
(origin (origin
(uri (git-reference (uri (git-reference
(url "git://ryuslash.org/util/tom/mpd-random-albums") (url "git://ryuslash.org/util/tom/mpd-random-albums")
(commit commit))) (commit commit)))
(method git-fetch) (method git-fetch)
(sha256 (sha256
(base32 "0mgs9377hw3x1nfcah3wwr3zijvzrkqicvgrbcjl3g1p4fmlb8mr")) (base32 "0mgs9377hw3x1nfcah3wwr3zijvzrkqicvgrbcjl3g1p4fmlb8mr"))
(file-name (git-file-name name version)))) (file-name (git-file-name name version))))
(propagated-inputs (propagated-inputs
(list mpd bash scsh)) (list mpd bash scsh))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:tests? #f `(#:tests? #f
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(delete 'configure) (delete 'configure)
(delete 'build) (delete 'build)
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((bin (string-append (assoc-ref outputs "out") "/bin")) (let ((bin (string-append (assoc-ref outputs "out") "/bin"))
(site (string-append (assoc-ref outputs "out") "/share/scsh-0.7"))) (site (string-append (assoc-ref outputs "out") "/share/scsh-0.7")))
(install-file "mpd-random-albums" bin) (install-file "mpd-random-albums" bin)
(install-file "mpd.scm" site))))))) (install-file "mpd.scm" site)))))))
(home-page "https://ryuslash.org/") (home-page "https://ryuslash.org/")
(synopsis "A simple script that populates the MPD playlist with all of my albums in random order.") (synopsis "A simple script that populates the MPD playlist with all of my albums in random order.")
(description "Creates a new playlist in MPD with all of the albums in my database and shuffles them by album.") (description "Creates a new playlist in MPD with all of the albums in my database and shuffles them by album.")
(license license:gpl3+)))) (license license:gpl3+))))

56
oni/packages/notmuch-collect-tasks.scm
View file

@ -11,31 +11,31 @@
(let ((commit "c0399a2bbd499d3fcdf2cfce2d9a8162d5865de0") (let ((commit "c0399a2bbd499d3fcdf2cfce2d9a8162d5865de0")
(revision "0")) (revision "0"))
(package (package
(name "notmuch-collect-tasks") (name "notmuch-collect-tasks")
(version (git-version "0.0.0" revision commit)) (version (git-version "0.0.0" revision commit))
(source (source
(origin (origin
(uri (git-reference (uri (git-reference
(url "git://ryuslash.org/util/tom/notmuch-collect-tasks.git") (url "git://ryuslash.org/util/tom/notmuch-collect-tasks.git")
(commit commit))) (commit commit)))
(method git-fetch) (method git-fetch)
(sha256 (sha256
(base32 "1rkxcmlmz5ncd3x59kgffg889wibi3q8d3gv2vm1nvaayzj58zm9")) (base32 "1rkxcmlmz5ncd3x59kgffg889wibi3q8d3gv2vm1nvaayzj58zm9"))
(file-name (git-file-name name version)))) (file-name (git-file-name name version))))
(propagated-inputs (propagated-inputs
(list bash notmuch)) (list bash notmuch))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:tests? #f `(#:tests? #f
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(delete 'configure) (delete 'configure)
(delete 'build) (delete 'build)
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((bin (string-append (assoc-ref outputs "out") "/bin"))) (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
(install-file "notmuch-collect-tasks" bin))))))) (install-file "notmuch-collect-tasks" bin)))))))
(home-page "https://ryuslash.org/") (home-page "https://ryuslash.org/")
(synopsis "A simple script that scans email subjects for tasks to add.") (synopsis "A simple script that scans email subjects for tasks to add.")
(description "Creates tasks based on incoming email.") (description "Creates tasks based on incoming email.")
(license license:gpl3+)))) (license license:gpl3+))))

56
oni/packages/notmuch-tag-mailinglists.scm
View file

@ -11,31 +11,31 @@
(let ((commit "b20cf1593c98b415cb144bd23c9c60926161d359") (let ((commit "b20cf1593c98b415cb144bd23c9c60926161d359")
(revision "0")) (revision "0"))
(package (package
(name "notmuch-tag-mailinglists") (name "notmuch-tag-mailinglists")
(version (git-version "0.0.0" revision commit)) (version (git-version "0.0.0" revision commit))
(source (source
(origin (origin
(uri (git-reference (uri (git-reference
(url "git://ryuslash.org/util/tom/notmuch-tag-mailinglists.git") (url "git://ryuslash.org/util/tom/notmuch-tag-mailinglists.git")
(commit commit))) (commit commit)))
(method git-fetch) (method git-fetch)
(sha256 (sha256
(base32 "0c3pn3ns4n5sh97plvbxv59i5rh8840fq73ic66kvhkij1c6l4rb")) (base32 "0c3pn3ns4n5sh97plvbxv59i5rh8840fq73ic66kvhkij1c6l4rb"))
(file-name (git-file-name name version)))) (file-name (git-file-name name version))))
(propagated-inputs (propagated-inputs
(list bash notmuch)) (list bash notmuch))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:tests? #f `(#:tests? #f
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(delete 'configure) (delete 'configure)
(delete 'build) (delete 'build)
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((bin (string-append (assoc-ref outputs "out") "/bin"))) (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
(install-file "notmuch-tag-mailinglists" bin))))))) (install-file "notmuch-tag-mailinglists" bin)))))))
(home-page "https://ryuslash.org/") (home-page "https://ryuslash.org/")
(synopsis "A simple script that scans email subjects for tasks to add.") (synopsis "A simple script that scans email subjects for tasks to add.")
(description "Creates tasks based on incoming email.") (description "Creates tasks based on incoming email.")
(license license:gpl3+)))) (license license:gpl3+))))

56
oni/packages/pick-random-wallpaper.scm
View file

@ -13,31 +13,31 @@
(let ((commit "6ab43c64aa34c6a13705435f7825d183a59544d8") (let ((commit "6ab43c64aa34c6a13705435f7825d183a59544d8")
(revision "0")) (revision "0"))
(package (package
(name "pick-random-wallpaper") (name "pick-random-wallpaper")
(version (git-version "0.0.0" revision commit)) (version (git-version "0.0.0" revision commit))
(source (source
(origin (origin
(uri (git-reference (uri (git-reference
(url "git://ryuslash.org/util/tom/pick-random-wallpaper.git") (url "git://ryuslash.org/util/tom/pick-random-wallpaper.git")
(commit commit))) (commit commit)))
(method git-fetch) (method git-fetch)
(sha256 (sha256
(base32 "1vkns0a46adaxx0qrw1iq3af1zmc3wy7gmsid0v8893a2688842d")) (base32 "1vkns0a46adaxx0qrw1iq3af1zmc3wy7gmsid0v8893a2688842d"))
(file-name (git-file-name name version)))) (file-name (git-file-name name version))))
(propagated-inputs (propagated-inputs
(list findutils bash herbstluftwm xwininfo coreutils feh)) (list findutils bash herbstluftwm xwininfo coreutils feh))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:tests? #f ; There is no test suite. `(#:tests? #f ; There is no test suite.
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(delete 'configure) (delete 'configure)
(delete 'build) (delete 'build)
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((bin (string-append (assoc-ref outputs "out") "/bin"))) (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
(install-file "pick-random-wallpaper" bin))))))) (install-file "pick-random-wallpaper" bin)))))))
(home-page "https://ryuslash.org/") (home-page "https://ryuslash.org/")
(synopsis "A simple script that sets a random wallpaper using feh.") (synopsis "A simple script that sets a random wallpaper using feh.")
(description "Sets a random wallpaper using feh and stores which wallpaper was added in a herbstluftwm attribute.") (description "Sets a random wallpaper using feh and stores which wallpaper was added in a herbstluftwm attribute.")
(license license:gpl3+)))) (license license:gpl3+))))

56
oni/packages/shutdown-rofi.scm
View file

@ -10,31 +10,31 @@
(let ((commit "79cc1bdbabe5d4a1521723de1a5b9c32a1df1c7c") (let ((commit "79cc1bdbabe5d4a1521723de1a5b9c32a1df1c7c")
(revision "0")) (revision "0"))
(package (package
(name "shutdown-rofi") (name "shutdown-rofi")
(version (git-version "0.0.0" revision commit)) (version (git-version "0.0.0" revision commit))
(source (source
(origin (origin
(uri (git-reference (uri (git-reference
(url "git://ryuslash.org/util/tom/shutdown-rofi") (url "git://ryuslash.org/util/tom/shutdown-rofi")
(commit commit))) (commit commit)))
(method git-fetch) (method git-fetch)
(sha256 (sha256
(base32 "17c5hr3yrafmmgcxi6m0njhp113yfcylv7ifpgds06sxxn8wdzv0")) (base32 "17c5hr3yrafmmgcxi6m0njhp113yfcylv7ifpgds06sxxn8wdzv0"))
(file-name (git-file-name name version)))) (file-name (git-file-name name version))))
(propagated-inputs (propagated-inputs
(list herbstluftwm rofi)) (list herbstluftwm rofi))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:tests? #f `(#:tests? #f
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(delete 'configure) (delete 'configure)
(delete 'build) (delete 'build)
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((bin (string-append (assoc-ref outputs "out") "/bin"))) (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
(install-file "shutdown-rofi" bin))))))) (install-file "shutdown-rofi" bin)))))))
(home-page "https://ryuslash.org/") (home-page "https://ryuslash.org/")
(synopsis "A simple script that shows a shutdown menu using rofi.") (synopsis "A simple script that shows a shutdown menu using rofi.")
(description "Uses rofi to show a simple shutdown menu.") (description "Uses rofi to show a simple shutdown menu.")
(license license:gpl3+)))) (license license:gpl3+))))