Add ZSH contextual abbrevs package
This commit is contained in:
parent
75190437c4
commit
c9d8a52b39
2 changed files with 65 additions and 1 deletions
|
@ -6,11 +6,14 @@
|
||||||
#:use-module (gnu home services utils)
|
#:use-module (gnu home services utils)
|
||||||
#:use-module (guix packages)
|
#:use-module (guix packages)
|
||||||
#:use-module (guix gexp)
|
#:use-module (guix gexp)
|
||||||
|
#:use-module (oni packages zsh)
|
||||||
|
|
||||||
#:export (home-zsh-autosuggestions-service-type
|
#:export (home-zsh-autosuggestions-service-type
|
||||||
home-zsh-autosuggestions-configuration
|
home-zsh-autosuggestions-configuration
|
||||||
home-zsh-syntax-highlighting-service-type
|
home-zsh-syntax-highlighting-service-type
|
||||||
home-zsh-syntax-highlighting-configuration))
|
home-zsh-syntax-highlighting-configuration
|
||||||
|
home-zsh-contextual-abbrevs-service-type
|
||||||
|
home-zsh-contextual-abbrevs-configuration))
|
||||||
|
|
||||||
(define-configuration/no-serialization home-zsh-autosuggestions-configuration
|
(define-configuration/no-serialization home-zsh-autosuggestions-configuration
|
||||||
(package
|
(package
|
||||||
|
@ -72,3 +75,33 @@
|
||||||
(compose identity)
|
(compose identity)
|
||||||
(default-value (home-zsh-syntax-highlighting-configuration))
|
(default-value (home-zsh-syntax-highlighting-configuration))
|
||||||
(description "Install and configure zsh-syntax-highlighting.")))
|
(description "Install and configure zsh-syntax-highlighting.")))
|
||||||
|
|
||||||
|
(define-configuration/no-serialization home-zsh-contextual-abbrevs-configuration
|
||||||
|
(package
|
||||||
|
(package zsh-contextual-abbrevs)
|
||||||
|
"Package to use for setting zsh-contexual-abbrevs."))
|
||||||
|
|
||||||
|
(define (add-zsh-contextual-abbrevs config)
|
||||||
|
(home-zsh-extension
|
||||||
|
(zshrc
|
||||||
|
(list
|
||||||
|
(mixed-text-file
|
||||||
|
"zshrc"
|
||||||
|
"source " (home-zsh-contextual-abbrevs-configuration-package config) "/share/zsh/plugins/zsh-contextual-abbrevs/contextual-abbrevs.zsh")))))
|
||||||
|
|
||||||
|
(define (add-zsh-contextual-abbrevs-packages config)
|
||||||
|
(list (home-zsh-contextual-abbrevs-configuration-package config)))
|
||||||
|
|
||||||
|
(define home-zsh-contextual-abbrevs-service-type
|
||||||
|
(service-type
|
||||||
|
(name 'home-zsh-contextual-abbrevs)
|
||||||
|
(extensions
|
||||||
|
(list (service-extension
|
||||||
|
home-zsh-service-type
|
||||||
|
add-zsh-contextual-abbrevs)
|
||||||
|
(service-extension
|
||||||
|
home-profile-service-type
|
||||||
|
add-zsh-contextual-abbrevs-packages)))
|
||||||
|
(compose identity)
|
||||||
|
(default-value (home-zsh-contextual-abbrevs-configuration))
|
||||||
|
(description "Install and configure zsh-contextual-abbrevs.")))
|
||||||
|
|
31
oni/packages/zsh.scm
Normal file
31
oni/packages/zsh.scm
Normal file
|
@ -0,0 +1,31 @@
|
||||||
|
(define-module (oni packages zsh)
|
||||||
|
#:use-module ((guix licenses) #:prefix license:)
|
||||||
|
#:use-module ((guix packages) #:select (package origin base32))
|
||||||
|
#:use-module ((guix git-download) #:select (git-version
|
||||||
|
git-reference
|
||||||
|
git-fetch
|
||||||
|
git-file-name))
|
||||||
|
#:use-module ((guix build-system copy) #:select (copy-build-system)))
|
||||||
|
|
||||||
|
(define-public zsh-contextual-abbrevs
|
||||||
|
(let ((commit "232ac42d70dba257fa904fc9a96f2a3bfed16585")
|
||||||
|
(revision "0"))
|
||||||
|
(package
|
||||||
|
(name "zsh-contextual-abbrevs")
|
||||||
|
(version (git-version "0.0.0" revision commit))
|
||||||
|
(source (origin
|
||||||
|
(uri (git-reference
|
||||||
|
(url "https://github.com/langston-barrett/zsh-contextual-abbrevs.git")
|
||||||
|
(commit commit)))
|
||||||
|
(method git-fetch)
|
||||||
|
(sha256
|
||||||
|
(base32 "02r6k0bhdbj585mchz8m9z5yjzk7xd48mz4mamirb9nap4n870zh"))
|
||||||
|
(file-name (git-file-name name version))))
|
||||||
|
(build-system copy-build-system)
|
||||||
|
(arguments
|
||||||
|
'(#:install-plan '(("src"
|
||||||
|
"/share/zsh/plugins/zsh-contextual-abbrevs"))))
|
||||||
|
(synopsis "Auto")
|
||||||
|
(description "Something")
|
||||||
|
(license license:expat)
|
||||||
|
(home-page "https://example.org"))))
|
Loading…
Reference in a new issue