move dconf file
This commit is contained in:
parent
43d36a94cb
commit
70a729453c
@ -1,5 +1,8 @@
|
||||
;;; dconf.el --- Edit dconf settings in an emacs buffer
|
||||
;;; dconf-mode.el --- Edit dconf settings in an emacs buffer
|
||||
;;;###autoload
|
||||
(add-to-list 'auto-mode-alist '("\\.gsets" . dconf-mode))
|
||||
;;; Commentary:
|
||||
|
||||
;; I haven't completely given up on GNOME. This is a little wrapper I've ported
|
||||
;; from my vim config to modify and save the running GNOME state to files.
|
||||
|
||||
@ -16,15 +19,25 @@
|
||||
(shell-command
|
||||
(concat "cat " buffer-file-name
|
||||
" | dconf load /org/gnome/" (file-name-base buffer-file-name) "/")))
|
||||
(defun dconf-dump-current-file ()
|
||||
"Load dconf's live registry into the current file."
|
||||
(interactive)
|
||||
(erase-buffer)
|
||||
(shell-command
|
||||
(concat "dconf dump /org/gnome/" (file-name-base buffer-file-name) "/")
|
||||
(current-buffer)))
|
||||
|
||||
(if (string-match "*.gsets" buffer-file-name)
|
||||
(progn
|
||||
(add-hook) ;BufReadPre
|
||||
;; (add-hook) ;BufReadPre
|
||||
(conf-windows-mode) ;BufReadPost might be default
|
||||
(add-hook after-save-hook
|
||||
#'dconf-load-current-file)
|
||||
)
|
||||
)
|
||||
|
||||
(provide 'dconf)
|
||||
;;; dconf.el ends here
|
||||
(define-derived-mode dconf-mode conf-mode "Dconf"
|
||||
(add-hook after-save-hook
|
||||
#'dconf-load-current-file)
|
||||
)
|
||||
|
||||
(provide 'dconf-mode)
|
||||
;;; dconf-mode.el ends here
|
Loading…
Reference in New Issue
Block a user