opal/opalfiles
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

removed old configurations

Browse Source
This commit is contained in:
opalvault
2022-05-20 15:55:06 -07:00
parent 8f2bbb6383
commit 3ce225f263
14 changed files with 2 additions and 264 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
.config/doom/config.el
View File

@@ -1,4 +1,4 @@
(setq fancy-splash-image "~/dotfiles/.config/doom/splash.png")
(setq fancy-splash-image "~/opalfiles/.config/doom/splash.png")
(setq user-full-name "ry"
user-mail-address "rpem66@pm.me")

2
.config/doom/init.el
View File

@@ -123,7 +123,7 @@
;;fsharp ; ML stands for Microsoft's Language
;;fstar ; (dependent) types and (monadic) effects and Z3
;;gdscript ; the language you waited for
(go +lsp) ; the hipster dialect
;;(go +lsp) ; the hipster dialect
;;(haskell +lsp) ; a language that's lazier than I am
;;hy ; readability of scheme w/ speed of python
;;idris ; a language you can depend on

15
.config/gtk-3.0/settings.ini
View File

@@ -1,15 +0,0 @@
[Settings]
gtk-cursor-theme-name=
gtk-theme-name=Arc-Dark
gtk-font-name=Fira Sans Regular
gtk-icon-theme-name=Papirus
gtk-cursor-theme-size=0
gtk-toolbar-style=GTK_TOOLBAR_BOTH
gtk-toolbar-icon-size=GTK_ICON_SIZE_LARGE_TOOLBAR
gtk-button-images=1
gtk-menu-images=1
gtk-enable-event-sounds=1
gtk-enable-input-feedback-sounds=1
gtk-xft-antialias=1
gtk-xft-hinting=1
gtk-xft-hintstyle=hintfull

BIN
.config/mbsync/.mu4e.gpg
View File

Binary file not shown.

26
.config/mbsync/mbsyncrc
View File

@@ -1,26 +0,0 @@
IMAPAccount opal.sh
Host imap.opal.sh
Port 993
User ry@opal.sh
PassCmd "gpg --quiet --for-your-eyes-only --no-tty --decrypt ~/Dotfiles/.config/mbsync/.mu4e.gpg"
SSLType IMAPS
CertificateFile /etc/ssl/certs/ca-certificates.crt
IMAPStore opal-remote
Account opal.sh
MaildirStore opal-local
Path ~/Mail/opal.sh/
Inbox ~/Mail/opal.sh/Inbox
Trash ~/Mail/opal.sh/Trash
SubFolders Verbatim
Channel opal.sh
Master :opal-remote:
Slave :opal-local:
Patterns *
Expunge None
CopyArrivalDate yes
Sync All
Create Both
SyncState *

206
.config/nyxt/init.lisp
View File

@@ -1,206 +0,0 @@
;; (in-package :nyxt)
;; (load "~/quicklisp/setup.lisp")
;; (ql:quickload 'slynk)
;; ;; (push #p"~/common-lisp/sly/" asdf:*central-registry*)
;; ;; (asdf:load-system :slynk)
;; ;; (slynk:create-server :port 4008)
(load-after-system :slynk (nyxt-init-file "my-slink.lisp"))
;; (load-after-system :slynk "~/.config/nyxt/my-slynk.lisp")
;; Vim-normal mode by default
(define-configuration buffer
((default-modes (append '(vi-normal-mode) '(blocker-mode) %slot-default%))))
;; Vim-insert for prompt-buffer (minibuffer)
(define-configuration prompt-buffer
((default-modes (append '(vi-insert-mode) %slot-default%))))
;; Keybindings
;; (Note: Override Map will override any other custom keybindings so use a prefix key.)
(define-configuration buffer
((override-map (define-key %slot-default%
"C-x s" 'nyxt/web-mode:search-buffers
"C-x u" 'copy-username
"C-x p" 'copy-password))))
;;Message buffer color configuration
(define-configuration window
((message-buffer-style
(str:concat
%slot-default%
(cl-css:css
'((body
:background-color "black"
:color "white")))))))
;; Mini-buffer style
(define-configuration prompt-buffer
((style (str:concat
%slot-default%
(cl-css:css
'((body
:background-color "black"
:color "white")
("#prompt-area"
:background-color "black")
;; The area you input text in.
("#input"
:background-color "#EDDDAA")
(".source-name"
:color "black"
:background-color "#125458")
(".source-content"
:background-color "black")
(".source-content th"
:border "1px solid #125458"
:background-color "black")
;; The currently highlighted option.
("#selection"
:background-color "#125458"
:color "black")
(.marked :background-color "#8B3A3A"
:font-weight "bold"
:color "white")
(.selected :background-color "black"
:color "white")))))))
;; Internal buffer (help, bookmarks, buffers panel)
(define-configuration (internal-buffer panel-buffer)
((style
(str:concat
%slot-default%
(cl-css:css
'((title
:color "#CD5C5C")
(body
:background-color "black"
:color "lightgray")
(hr
:color "lightgray")
(a
:color "#125458")
(.button
:color "white"
:background-color "#125458")))))))
;; Link hints in web mode
(define-configuration nyxt/web-mode:web-mode
((nyxt/web-mode:highlighted-box-style
(cl-css:css
'((".nyxt-hint.nyxt-highlight-hint"
:background "#125458"))))))
;; Modeline
(define-configuration status-buffer
((style (str:concat
%slot-default%
(cl-css:css
;; Arrows on the left.
'(("#controls"
:border-top "1px solid white"
:background-color "#125458")
;; To the right of the arrows.
("#url"
:background-color "black"
:color "white"
:border-top "1px solid white")
;; Far to the right.
("#modes"
:background-color "black"
:border-top "1px solid white")
;; The center segment.
("#tabs"
:background-color "#125458"
:color "black"
:border-top "1px solid white")))))))
;; Overriding dark theme colors
(define-configuration nyxt/style-mode:dark-mode
((style #.(cl-css:css
'((*
:background-color "black !important"
:background-image "none !important"
:color "white")
(a
:background-color "black !important"
:background-image "none !important"
:color "#556B2F !important"))))))
(define-configuration password:keepassxc-interface
((password:password-file "/home/opal/.config/keepassxc/.kdbx-store/opal.kdbx")))
(define-configuration buffer
((password-interface (make-instance 'password:user-keepassxc-interface))))
;; (define-command set-url (&key (prefill-current-url-p t))
;; "Set the URL for the current buffer, completing with history."
;; (let ((history (set-url-history *browser*))
;; (actions (list (make-command buffer-load* (suggestion-values)
;; "Load first selected URL in current buffer and the rest in new buffer(s)."
;; (mapc (lambda (suggestion) (make-buffer :url (url suggestion))) (rest suggestion-values))
;; (buffer-load (url (first suggestion-values))))
;; (make-command new-buffer-load (suggestion-values)
;; "Load URL(s) in new buffer(s)."
;; (mapc (lambda (suggestion) (make-buffer :url (url suggestion))) (rest suggestion-values))
;; (make-buffer-focus :url (url (first suggestion-values)))))))
;; (pushnew-url-history history (url (current-buffer)))
;; (prompt
;; :prompt "Open URL"
;; :input (if prefill-current-url-p
;; (render-url (url (current-buffer))) "")
;; :history history
;; :sources (list (make-instance 'user-new-url-or-search-source :actions actions)
;; (make-instance 'bookmark-source :actions actions)
;; (make-instance 'user-global-history-source :actions actions)
;; (make-instance 'search-engine-url-source :actions actions)))))
;; (define-command set-url-new-buffer (&key (prefill-current-url-p t))
;; "Prompt for a URL and set it in a new focused buffer."
;; (let ((history (set-url-history *browser*))
;; (actions (list (make-command new-buffer-load (suggestion-values)
;; "Load URL(s) in new buffer(s)"
;; (mapc (lambda (suggestion) (make-buffer :url (url suggestion)))
;; (rest suggestion-values))
;; (make-buffer-focus :url (url (first suggestion-values)))))))
;; (pushnew-url-history history (url (current-buffer)))
;; (prompt
;; :prompt "Open URL in new buffer"
;; :input (if prefill-current-url-p
;; (render-url (url (current-buffer))) "")
;; :history history
;; :sources (list (make-instance 'user-new-url-or-search-source :actions actions)
;; (make-instance 'bookmark-source :actions actions)
;; (make-instance 'user-global-history-source :actions actions)
;; (make-instance 'search-engine-url-source :actions actions)))))
;; I would like to implement redirection, or some extension to handle it for me.
;; todo: Redirect reddit to teddit
;; (defun old-reddit-handler (request-data)
;; (let ((url (url request-data)))
;; (setf (url request-data)
;; (if (search "reddit.com" (quri:uri-host url))
;; (progn
;; (setf (quri:uri-host url) "old.reddit.com")
;; (log:info "Switching to old Reddit: ~s" (render-url url))
;; url)
;; url)))
;; request-data)
;; (define-configuration web-buffer
;; ((request-resource-hook
;; (hooks:add-hook %slot-default% (make-handler-resource #'old-reddit-handler)))))
;; (See url-dispatching-handler for a simpler way to achieve the same result.)
;; (defun nyxt-init-file (&optional subpath)
;; "Return SUBPATH relative to `*init-file-path*'.
;; Return nil if `*init-file-path*' is nil.
;; Example:
;; If we want to load a define-command procedure that lives in ~/path/to/nyxt/config/dir/my-slink.lisp
;; (load-after-system :slynk (nyxt-init-file \"my-slink.lisp\"))"
;; (if subpath
;; (uiop:subpathname* (uiop:pathname-directory-pathname
;; (expand-path *init-file-path*))
;; subpath)
;; (expand-path *init-file-path*)))

10
.config/nyxt/my-slink.lisp
View File

@@ -1,10 +0,0 @@
(define-command-global start-slynk (&optional (slynk-port *swank-port*))
"Start a Slynk server that can be connected to, for instance, in
Emacs via SLY.
Warning: This allows Nyxt to be controlled remotely, that is, to execute
arbitrary code with the privileges of the user running Nyxt. Make sure
you understand the security risks associated with this before running
this command."
(slynk:create-server :port slynk-port :dont-close t)
(echo "Slynk server started at port ~a" slynk-port))

BIN
.config/wallpapers/1.jpg
View File

Binary file not shown.
Side by Side

Before

Width:  |  Height:  |  Size: 1.2 MiB

BIN
.config/wallpapers/2.jpg
View File

Binary file not shown.
Side by Side

Before

Width:  |  Height:  |  Size: 1.3 MiB

BIN
.config/wallpapers/3.jpg
View File

Binary file not shown.
Side by Side

Before

Width:  |  Height:  |  Size: 2.0 MiB

BIN
.config/wallpapers/fog-wallpaper.jpg
View File

Binary file not shown.
Side by Side

Before

Width:  |  Height:  |  Size: 768 KiB

BIN
.config/wallpapers/guix-wallpaper.jpg
View File

Binary file not shown.
Side by Side

Before

Width:  |  Height:  |  Size: 1.1 MiB

BIN
.config/wallpapers/wallpaper-town.jpg
View File

Binary file not shown.
Side by Side

Before

Width:  |  Height:  |  Size: 3.5 MiB

5
.config/zathura/zathurarc
View File

@@ -1,5 +0,0 @@
# Zathura config
set adjust-open "best-fit"
set font "Iosevka 15"