nyxt being added
This commit is contained in:
		
							parent
							
								
									ae2ad7dd9d
								
							
						
					
					
						commit
						f9228ee51d
					
				
					 8 changed files with 103 additions and 10 deletions
				
			
		| 
						 | 
				
			
			@ -72,7 +72,7 @@
 | 
			
		|||
                                                (if (= "syl\n" stdout)
 | 
			
		||||
                                                    (global laptop true)
 | 
			
		||||
                                                    (global laptop false))))
 | 
			
		||||
(local laptop true)
 | 
			
		||||
(local laptop false)
 | 
			
		||||
 | 
			
		||||
;; Table of layouts to cover with awful.layout.inc, order matters.
 | 
			
		||||
(set awful.layout.layouts [
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -36,7 +36,7 @@
 | 
			
		|||
               :properties {
 | 
			
		||||
                            :floating true
 | 
			
		||||
                            :raise true
 | 
			
		||||
                            :height (dpi 900)
 | 
			
		||||
                            :height (dpi 870)
 | 
			
		||||
                            :screen (screen.count)
 | 
			
		||||
                            :placement (+ awful.placement.no_offscreen awful.placement.centered)
 | 
			
		||||
                            }
 | 
			
		||||
| 
						 | 
				
			
			@ -159,6 +159,9 @@
 | 
			
		|||
                          :instance [
 | 
			
		||||
                                     "fp64"
 | 
			
		||||
                                     ]
 | 
			
		||||
                          :name [
 | 
			
		||||
                                 "Projection Window"
 | 
			
		||||
                                 ]
 | 
			
		||||
                          }
 | 
			
		||||
               :properties {
 | 
			
		||||
                            :fullscreen true
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -2,7 +2,7 @@
 | 
			
		|||
vo=gpu
 | 
			
		||||
af=scaletempo2
 | 
			
		||||
speed=1.95
 | 
			
		||||
autofit=75%
 | 
			
		||||
autofit=70%
 | 
			
		||||
geometry=50%:50%
 | 
			
		||||
input-ipc-server="/tmp/mpvsocket"
 | 
			
		||||
hwdec=auto
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
							
								
								
									
										83
									
								
								nyxt/init.lisp
									
										
									
									
									
										Normal file
									
								
							
							
						
						
									
										83
									
								
								nyxt/init.lisp
									
										
									
									
									
										Normal file
									
								
							| 
						 | 
				
			
			@ -0,0 +1,83 @@
 | 
			
		|||
(in-package :nyxt-user) ; While implicit, this allows SLY to know which package we are in.
 | 
			
		||||
 | 
			
		||||
(define-configuration (prompt-buffer)
 | 
			
		||||
    ((default-modes (append '(vi-insert-mode) %slot-default%))))
 | 
			
		||||
 | 
			
		||||
;; Create a function to launch mpv with given url
 | 
			
		||||
(defun mpv (url)
 | 
			
		||||
    "MPV launches with given url"
 | 
			
		||||
   (uiop:run-program (list "mpv" url)))
 | 
			
		||||
 | 
			
		||||
;; Let's create a function to hint videos and play them in MPV
 | 
			
		||||
(define-command hint-mpv (&key nyxt/web-mode::annotate-visible-only-p)
 | 
			
		||||
    "Show a set of element hints, and copy the URL of the user inputted one."
 | 
			
		||||
  (nyxt/web-mode:query-hints "Copy element URL"
 | 
			
		||||
                             (lambda (nyxt/web-mode::result)
 | 
			
		||||
                               (mpv (first nyxt/web-mode::result)))
 | 
			
		||||
                             :annotate-visible-only-p
 | 
			
		||||
                             nyxt/web-mode::annotate-visible-only-p))
 | 
			
		||||
 | 
			
		||||
(defvar *chris-keymap* (make-keymap "chris-map"))
 | 
			
		||||
(define-key *chris-keymap*
 | 
			
		||||
  "K" 'switch-buffer-next
 | 
			
		||||
  "J" 'switch-buffer-previous
 | 
			
		||||
  "b" 'switch-buffer
 | 
			
		||||
  "v" 'hint-mpv)
 | 
			
		||||
 | 
			
		||||
(define-mode chris-mode ()
 | 
			
		||||
  "Dummy mode for the custom key bindings in `*chris-keymap*'."
 | 
			
		||||
  ((keymap-scheme (keymap:make-scheme
 | 
			
		||||
                   scheme:vi-normal *chris-keymap*))))
 | 
			
		||||
 | 
			
		||||
(define-configuration buffer
 | 
			
		||||
  ((default-modes (append '(vi-normal-mode
 | 
			
		||||
                            auto-mode
 | 
			
		||||
                            reduce-tracking-mode
 | 
			
		||||
                            force-https-mode
 | 
			
		||||
                            chris-mode)
 | 
			
		||||
                   %slot-default%))))
 | 
			
		||||
 | 
			
		||||
(define-configuration status-buffer
 | 
			
		||||
  ((style
 | 
			
		||||
    (str:concat
 | 
			
		||||
     %slot-default%
 | 
			
		||||
     (cl-css:css
 | 
			
		||||
      '((body
 | 
			
		||||
         :background "#282a36"
 | 
			
		||||
         :color "#e2e4e5")))))))
 | 
			
		||||
 | 
			
		||||
(define-configuration internal-buffer
 | 
			
		||||
  ((style
 | 
			
		||||
    (str:concat
 | 
			
		||||
     %slot-default%
 | 
			
		||||
     (cl-css:css
 | 
			
		||||
      '((body
 | 
			
		||||
         :background-color "#282a36"
 | 
			
		||||
         :color "#e2e4e5")
 | 
			
		||||
        (hr
 | 
			
		||||
         :color "#5af78e")
 | 
			
		||||
        (.button
 | 
			
		||||
         :color "#e2e4e5")))))))
 | 
			
		||||
(define-configuration window
 | 
			
		||||
  ((message-buffer-style
 | 
			
		||||
    (str:concat
 | 
			
		||||
     %slot-default%
 | 
			
		||||
     (cl-css:css
 | 
			
		||||
      '((body
 | 
			
		||||
         :background-color "#282a36"
 | 
			
		||||
         :color "#e2e4e5")))))))
 | 
			
		||||
 | 
			
		||||
;; (define-configuration prompt-buffer
 | 
			
		||||
;;   ((style
 | 
			
		||||
;;     (str:concat
 | 
			
		||||
;;      %slot-default%
 | 
			
		||||
;;      (cl-css:css
 | 
			
		||||
;;       '((body
 | 
			
		||||
;;          :background-color "#282a36"
 | 
			
		||||
;;          :color "#e2e4e5")
 | 
			
		||||
;;         ('#prompt-area'
 | 
			
		||||
;;          :background-color "#282a36")
 | 
			
		||||
;;         (.button
 | 
			
		||||
;;          :color "#e2e4e5")))))))
 | 
			
		||||
 | 
			
		||||
(load-after-system :slynk "~/.config/nyxt/my-slynk.lisp")
 | 
			
		||||
							
								
								
									
										11
									
								
								nyxt/my-slynk.lisp
									
										
									
									
									
										Normal file
									
								
							
							
						
						
									
										11
									
								
								nyxt/my-slynk.lisp
									
										
									
									
									
										Normal file
									
								
							| 
						 | 
				
			
			@ -0,0 +1,11 @@
 | 
			
		|||
(define-command 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))
 | 
			
		||||
    
 | 
			
		||||
| 
						 | 
				
			
			@ -8,10 +8,11 @@ config_version: 2
 | 
			
		|||
settings:
 | 
			
		||||
  content.geolocation:
 | 
			
		||||
    https://openweathermap.org: false
 | 
			
		||||
  content.media.video_capture:
 | 
			
		||||
    https://jitsi.tfcconnection.org: true
 | 
			
		||||
  content.notifications.enabled:
 | 
			
		||||
    https://jelly.cochrun.xyz: true
 | 
			
		||||
    https://nc.cochrun.xyz: false
 | 
			
		||||
    https://toolbox.iskysoft.com: false
 | 
			
		||||
    https://www.facebook.com: false
 | 
			
		||||
    https://www.g2a.com: false
 | 
			
		||||
    https://www.reddit.com: false
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -1,12 +1,7 @@
 | 
			
		|||
[FileDialog]
 | 
			
		||||
="======"
 | 
			
		||||
<<<<<<< HEAD
 | 
			
		||||
history=file:///home/chris/Pictures, file:///home/chris/Videos, file:///home/chris, file:///home/chris/Downloads, file:///home/chris/Documents/TFC Stuff/newsletterpics
 | 
			
		||||
lastVisited=file:///home/chris/Downloads
 | 
			
		||||
=======
 | 
			
		||||
history=file:///home/chris/Pictures/tfc, file:///home/chris/Pictures, file:///home/chris/Videos, file:///home/chris, file:///home/chris/Downloads
 | 
			
		||||
lastVisited=file:///home/chris
 | 
			
		||||
>>>>>>> 17d2a373e69612d8bf761a1f3cec3ff1ee866f2a
 | 
			
		||||
qtVersion=5.15.2
 | 
			
		||||
shortcuts=file:, file:///home/chris
 | 
			
		||||
sidebarWidth=116
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -10,4 +10,4 @@ configuration {
 | 
			
		|||
  run-command:        "fish -c {cmd}";
 | 
			
		||||
  run-list-command:   "fish -c functions";
 | 
			
		||||
}
 | 
			
		||||
@import "/home/chris/.dotfiles/rofi/launchers-git/laptop.rasi"
 | 
			
		||||
@import "/home/chris/.dotfiles/rofi/launchers-git/desktop.rasi"
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue