added stuff
This commit is contained in:
parent
ce751e81f7
commit
b39b3c4edf
|
@ -0,0 +1,66 @@
|
|||
;;; persp-mode-autoloads.el --- automatically extracted autoloads -*- lexical-binding: t -*-
|
||||
;;
|
||||
;;; Code:
|
||||
|
||||
(add-to-list 'load-path (directory-file-name
|
||||
(or (file-name-directory #$) (car load-path))))
|
||||
|
||||
|
||||
;;;### (autoloads nil "persp-mode" "persp-mode.el" (0 0 0 0))
|
||||
;;; Generated autoloads from persp-mode.el
|
||||
|
||||
(autoload 'persp-def-auto-persp "persp-mode" "\
|
||||
|
||||
|
||||
\(fn NAME &rest KEYARGS &key BUFFER-NAME FILE-NAME MODE MODE-NAME MINOR-MODE MINOR-MODE-NAME PREDICATE HOOKS DYN-ENV GET-NAME GET-BUFFER GET-PERSP SWITCH PARAMETERS NOAUTO WEAK USER-DATA ON-MATCH AFTER-MATCH DONT-PICK-UP-BUFFERS DELETE)" nil nil)
|
||||
|
||||
(define-obsolete-function-alias 'def-auto-persp 'persp-def-auto-persp "persp-mode 2.9.6")
|
||||
|
||||
(autoload 'persp-def-buffer-save/load "persp-mode" "\
|
||||
|
||||
|
||||
\(fn &rest KEYARGS &key BUFFER-NAME FILE-NAME MODE MODE-NAME MINOR-MODE MINOR-MODE-NAME PREDICATE TAG-SYMBOL SAVE-VARS SAVE-FUNCTION LOAD-FUNCTION AFTER-LOAD-FUNCTION MODE-RESTORE-FUNCTION APPEND)" nil nil)
|
||||
|
||||
(define-obsolete-function-alias 'def-persp-buffer-save/load 'persp-def-buffer-save/load "persp-mode 2.9.6")
|
||||
|
||||
(defvar persp-mode nil "\
|
||||
Non-nil if Persp mode is enabled.
|
||||
See the `persp-mode' command
|
||||
for a description of this minor mode.
|
||||
Setting this variable directly does not take effect;
|
||||
either customize it (see the info node `Easy Customization')
|
||||
or call the function `persp-mode'.")
|
||||
|
||||
(custom-autoload 'persp-mode "persp-mode" nil)
|
||||
|
||||
(autoload 'persp-mode "persp-mode" "\
|
||||
Toggle the persp-mode.
|
||||
When active, keeps track of multiple 'perspectives',
|
||||
named collections of buffers and window configurations.
|
||||
Here is a keymap of this minor mode:
|
||||
\\{persp-mode-map}
|
||||
|
||||
If called interactively, toggle `Persp mode'. If the prefix
|
||||
argument is positive, enable the mode, and if it is zero or
|
||||
negative, disable the mode.
|
||||
|
||||
If called from Lisp, toggle the mode if ARG is `toggle'. Enable
|
||||
the mode if ARG is nil, omitted, or is a positive number.
|
||||
Disable the mode if ARG is a negative number.
|
||||
|
||||
The mode's hook is called both when the mode is enabled and when
|
||||
it is disabled.
|
||||
|
||||
\(fn &optional ARG)" t nil)
|
||||
|
||||
(register-definition-prefixes "persp-mode" '("*persp-" "clear-window-persp" "def-" "get-" "ido-toggle-persp-filter" "persp" "safe-persp-" "set-" "window-persp-set-p" "with-persp-ido-hooks"))
|
||||
|
||||
;;;***
|
||||
|
||||
;; Local Variables:
|
||||
;; version-control: never
|
||||
;; no-byte-compile: t
|
||||
;; no-update-autoloads: t
|
||||
;; coding: utf-8
|
||||
;; End:
|
||||
;;; persp-mode-autoloads.el ends here
|
|
@ -0,0 +1,2 @@
|
|||
;;; Generated package description from persp-mode.el -*- no-byte-compile: t -*-
|
||||
(define-package "persp-mode" "20201128.2015" "windows/buffers sets shared among frames + save/load." '((emacs "24.3")) :commit "298df111f081b5925f0aa0126a1b8d334117e0a2" :authors '(("Constantin Kulikov (Bad_ptr)" . "zxnotdead@gmail.com")) :maintainer '("Constantin Kulikov (Bad_ptr)" . "zxnotdead@gmail.com") :keywords '("perspectives" "session" "workspace" "persistence" "windows" "buffers" "convenience") :url "https://github.com/Bad-ptr/persp-mode.el")
|
File diff suppressed because it is too large
Load Diff
Binary file not shown.
|
@ -0,0 +1,22 @@
|
|||
;;; workgroups-autoloads.el --- automatically extracted autoloads -*- lexical-binding: t -*-
|
||||
;;
|
||||
;;; Code:
|
||||
|
||||
(add-to-list 'load-path (directory-file-name
|
||||
(or (file-name-directory #$) (car load-path))))
|
||||
|
||||
|
||||
;;;### (autoloads nil "workgroups" "workgroups.el" (0 0 0 0))
|
||||
;;; Generated autoloads from workgroups.el
|
||||
|
||||
(register-definition-prefixes "workgroups" '("w-set-frame-size-and-scale-wtree" "wg-" "workgroups-mode"))
|
||||
|
||||
;;;***
|
||||
|
||||
;; Local Variables:
|
||||
;; version-control: never
|
||||
;; no-byte-compile: t
|
||||
;; no-update-autoloads: t
|
||||
;; coding: utf-8
|
||||
;; End:
|
||||
;;; workgroups-autoloads.el ends here
|
|
@ -0,0 +1,2 @@
|
|||
;;; Generated package description from workgroups.el -*- no-byte-compile: t -*-
|
||||
(define-package "workgroups" "20110726.1641" "workgroups for windows (for Emacs)" 'nil :commit "9572b3492ee09054dc329f64ed846c962b395e39" :authors '(("tlh" . "thunkout@gmail.com")) :maintainer '("tlh" . "thunkout@gmail.com") :keywords '("session" "management" "window-configuration" "persistence"))
|
File diff suppressed because it is too large
Load Diff
Binary file not shown.
70
init.el
70
init.el
|
@ -11,25 +11,27 @@
|
|||
|
||||
;; setup dashboard
|
||||
|
||||
(require 'dashboard)
|
||||
(use-package dashboard
|
||||
:ensure t
|
||||
:config
|
||||
(dashboard-setup-startup-hook))
|
||||
:ensure t
|
||||
:config
|
||||
(dashboard-setup-startup-hook))
|
||||
|
||||
;; Set the title
|
||||
(setq dashboard-banner-logo-title "Welcome to Emacs Dashboard")
|
||||
(setq dashboard-banner-logo-title "Welcome to Emacs!")
|
||||
|
||||
;; Set the banner
|
||||
(setq dashboard-startup-banner 'logo)
|
||||
;; Value can be
|
||||
;;'official which displays the official emacs logo
|
||||
;;'logo which displays an alternative emacs logo
|
||||
;;1, 2 or 3 which displays one of the text banners
|
||||
;;"path/to/your/image.png" or "path/to/your/text.txt" which displays whatever image/text you would prefer
|
||||
|
||||
;; Content is not centered by default. To center, set
|
||||
(setq dashboard-center-content t)
|
||||
;; Icons
|
||||
(setq dashboard-set-heading-icons t)
|
||||
(setq dashboard-set-file-icons t)
|
||||
|
||||
;; Navigator
|
||||
(setq dashboard-set-navigator t)
|
||||
|
||||
|
||||
;; Widgets
|
||||
(setq dashboard-items 'nil)
|
||||
|
||||
(set-face-attribute 'default nil :font "Cascadia Code" :height 100)
|
||||
|
||||
|
@ -284,3 +286,47 @@
|
|||
(expand-file-name "custom.el" server-socket-dir)
|
||||
(expand-file-name (format "emacs-custom-%s.el" (user-uid)) temporary-file-directory)))
|
||||
(load custom-file t)
|
||||
|
||||
|
||||
(defvar +workspace--last nil)
|
||||
(defvar +workspace--index 0)
|
||||
|
||||
;;;###autoload
|
||||
(defface +workspace-tab-selected-face '((t (:inherit highlight)))
|
||||
"The face for selected tabs displayed by `+workspace/display'"
|
||||
:group 'persp-mode)
|
||||
|
||||
;;;###autoload
|
||||
(defface +workspace-tab-face '((t (:inherit default)))
|
||||
"The face for selected tabs displayed by `+workspace/display'"
|
||||
:group 'persp-mode)
|
||||
|
||||
|
||||
;;
|
||||
;;; Library
|
||||
|
||||
(defun +workspace--protected-p (name)
|
||||
(equal name persp-nil-name))
|
||||
|
||||
(defun +workspace--generate-id ()
|
||||
(or (cl-loop for name in (+workspace-list-names)
|
||||
when (string-match-p "^#[0-9]+$" name)
|
||||
maximize (string-to-number (substring name 1)) into max
|
||||
finally return (if max (1+ max)))
|
||||
1))
|
||||
|
||||
|
||||
;;; Predicates
|
||||
;;;###autoload
|
||||
(defalias #'+workspace-p #'perspective-p
|
||||
"Return t if OBJ is a perspective hash table.")
|
||||
|
||||
;;;###autoload
|
||||
(defun +workspace-exists-p (name)
|
||||
"Returns t if NAME is the name of an existing workspace."
|
||||
(member name (+workspace-list-names)))
|
||||
|
||||
;;;###autoload
|
||||
(defalias #'+workspace-contains-buffer-p #'persp-contain-buffer-p
|
||||
"Return non-nil if BUFFER is in WORKSPACE (defaults to current workspace).")
|
||||
|
||||
|
|
Loading…
Reference in New Issue