ido-completing-read+ added

code/elpa/ido-completing-read+-20210529.1318/ido-completing-read+-autoloads.el

@@ -0,0 +1,104 @@
+;;; ido-completing-read+-autoloads.el --- automatically extracted autoloads
+;;
+;;; Code:
+
+(add-to-list 'load-path (directory-file-name
+                         (or (file-name-directory #$) (car load-path))))
+
+
+;;;### (autoloads nil "ido-completing-read+" "ido-completing-read+.el"
+;;;;;;  (0 0 0 0))
+;;; Generated autoloads from ido-completing-read+.el
+
+(defvar ido-cr+-minibuffer-depth -1 "\
+Minibuffer depth of the most recent ido-cr+ activation.
+
+If this equals the current minibuffer depth, then the minibuffer
+is currently being used by ido-cr+, and ido-cr+ features will be
+active. Otherwise, something else is using the minibuffer and
+ido-cr+ features will be deactivated to avoid interfering with
+the other command.
+
+This is set to -1 by default, since `(minibuffer-depth)' should
+never return this value.")
+
+(defvar ido-cr+-replace-completely nil "\
+If non-nil, replace `ido-completeing-read' completely with ido-cr+.
+
+Enabling this may interfere with or cause errors in other
+packages that use `ido-completing-read'. If you discover any such
+incompatibilities, please file a bug report at
+https://github.com/DarwinAwardWinner/ido-completing-read-plus/issues")
+
+(custom-autoload 'ido-cr+-replace-completely "ido-completing-read+" t)
+
+(defsubst ido-cr+-active nil "\
+Return non-nil if ido-cr+ is currently using the minibuffer." (>= ido-cr+-minibuffer-depth (minibuffer-depth)))
+
+(autoload 'ido-completing-read+ "ido-completing-read+" "\
+Ido-based method for reading from the minibuffer with completion.
+
+See `completing-read' for the meaning of the arguments.
+
+This function is a wrapper for `ido-completing-read' designed to
+be used as the value of `completing-read-function'. Importantly,
+it detects edge cases that ido cannot handle and uses normal
+completion for them.
+
+See `completing-read' for the meaning of the arguments.
+
+\(fn PROMPT COLLECTION &optional PREDICATE REQUIRE-MATCH INITIAL-INPUT HIST DEF INHERIT-INPUT-METHOD)" nil nil)
+
+(autoload 'ido-completing-read@ido-cr+-replace "ido-completing-read+" "\
+This advice allows ido-cr+ to completely replace `ido-completing-read'.
+
+See the varaible `ido-cr+-replace-completely' for more information.
+
+\(fn ORIG-FUN &rest ARGS)" nil nil)
+
+(advice-add 'ido-completing-read :around #'ido-completing-read@ido-cr+-replace)
+
+(autoload 'call-interactively@ido-cr+-record-current-command "ido-completing-read+" "\
+Let-bind the command being interactively called.
+
+See `ido-cr+-current-command' for more information.
+
+\(fn ORIG-FUN COMMAND &rest ARGS)" nil nil)
+
+(advice-add 'call-interactively :around #'call-interactively@ido-cr+-record-current-command)
+
+(defvar ido-ubiquitous-mode nil "\
+Non-nil if Ido-Ubiquitous mode is enabled.
+See the `ido-ubiquitous-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 `ido-ubiquitous-mode'.")
+
+(custom-autoload 'ido-ubiquitous-mode "ido-completing-read+" nil)
+
+(autoload 'ido-ubiquitous-mode "ido-completing-read+" "\
+Use ido completion instead of standard completion almost everywhere.
+
+If called interactively, enable Ido-Ubiquitous mode if ARG is
+positive, and disable it if ARG is zero or negative.  If called
+from Lisp, also enable the mode if ARG is omitted or nil, and
+toggle it if ARG is `toggle'; disable the mode otherwise.
+
+If this mode causes problems for a function, you can customize
+when ido completion is or is not used by customizing
+`ido-cr+-disable-list'.
+
+\(fn &optional ARG)" t nil)
+
+(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "ido-completing-read+" '("ido-" "minibuf-eldef-update-minibuffer@ido-cr+-compat")))
+
+;;;***
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; coding: utf-8
+;; End:
+;;; ido-completing-read+-autoloads.el ends here

code/elpa/ido-completing-read+-20210529.1318/ido-completing-read+-pkg.el

@@ -0,0 +1,2 @@
+;;; Generated package description from ido-completing-read+.el  -*- no-byte-compile: t -*-
+(define-package "ido-completing-read+" "20210529.1318" "A completing-read-function using ido" '((emacs "24.4") (seq "0.5") (memoize "1.1")) :commit "49e7967ea8c0ab0a206b40d70fc19be115083fa1" :authors '(("Ryan C. Thompson" . "rct@thompsonclan.org")) :maintainer '("Ryan C. Thompson" . "rct@thompsonclan.org") :keywords '("ido" "completion" "convenience") :url "https://github.com/DarwinAwardWinner/ido-completing-read-plus")

code/elpa/memoize-20200103.2036/memoize-autoloads.el

@@ -0,0 +1,22 @@
+;;; memoize-autoloads.el --- automatically extracted autoloads
+;;
+;;; Code:
+
+(add-to-list 'load-path (directory-file-name
+                         (or (file-name-directory #$) (car load-path))))
+
+
+;;;### (autoloads nil "memoize" "memoize.el" (0 0 0 0))
+;;; Generated autoloads from memoize.el
+
+(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "memoize" '("defmemoize" "memoize")))
+
+;;;***
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; coding: utf-8
+;; End:
+;;; memoize-autoloads.el ends here

code/elpa/memoize-20200103.2036/memoize-pkg.el

@@ -0,0 +1,2 @@
+;;; Generated package description from memoize.el  -*- no-byte-compile: t -*-
+(define-package "memoize" "20200103.2036" "Memoization functions" 'nil :commit "51b075935ca7070f62fae1d69fe0ff7d8fa56fdd" :authors '(("Christopher Wellons" . "mosquitopsu@gmail.com")) :maintainer '("Christopher Wellons" . "mosquitopsu@gmail.com") :url "https://github.com/skeeto/emacs-memoize")

code/elpa/memoize-20200103.2036/memoize.el

@@ -0,0 +1,190 @@
+;;; memoize.el --- Memoization functions -*- lexical-binding: t; -*-
+
+;; This is free and unencumbered software released into the public domain.
+
+;; Author: Christopher Wellons <mosquitopsu@gmail.com>
+;; URL: https://github.com/skeeto/emacs-memoize
+;; Package-Version: 20200103.2036
+;; Package-Commit: 51b075935ca7070f62fae1d69fe0ff7d8fa56fdd
+;; Version: 1.1
+
+;;; Commentary:
+
+;; `memoize' accepts a symbol or a function. When given a symbol, the
+;; symbol's function definition is memoized and installed overtop of
+;; the original function definition. When given a function, it returns
+;; a memoized version of that function.
+
+;;     (memoize 'my-expensive-function)
+
+;; `defmemoize' defines a memoized function directly, behaving just
+;; like `defun'.
+
+;;     (defmemoize my-expensive-function (n)
+;;       (if (zerop n)
+;;           1
+;;         (* n (my-expensive-function (1- n)))))
+
+;; Memoizing an interactive function will render that function
+;; non-interactive. It would be easy to fix this problem when it comes
+;; to non-byte-compiled functions, but recovering the interactive
+;; definition from a byte-compiled function is more complex than I
+;; care to deal with. Besides, interactive functions are always used
+;; for their side effects anyway.
+
+;; There's no way to memoize nil returns, but why would your expensive
+;; functions do all that work just to return nil? :-)
+
+;; Memoization takes up memory, which should be freed at some point.
+;; Because of this, all memoization has a timeout from when the last
+;; access was. The default timeout is set by
+;; `memoize-default-timeout'.  It can be overridden by using the
+;; `memoize' function, but the `defmemoize' macro will always just use
+;; the default timeout.
+
+;; If you wait to byte-compile the function until *after* it is
+;; memoized then the function and memoization wrapper both get
+;; compiled at once, so there's no special reason to do them
+;; separately. But there really isn't much advantage to compiling the
+;; memoization wrapper anyway.
+
+;;; Code:
+
+(require 'cl-lib)
+
+(defvar memoize-default-timeout "2 hours"
+  "The amount of time after which to remove a memoization.
+This represents the time after last use of the memoization after
+which the value is expired. Setting this to nil means to never
+expire, which will cause a memory leak, but may be acceptable for
+very careful uses.")
+
+(defun memoize (func &optional timeout)
+  "Memoize FUNC: a closure, lambda, or symbol.
+
+If argument is a symbol then install the memoized function over
+the original function. The TIMEOUT value, a timeout string as
+used by `run-at-time' will determine when the value expires, and
+will apply after the last access (unless another access
+happens)."
+  (cl-typecase func
+    (symbol
+     (when (get func :memoize-original-function)
+       (user-error "%s is already memoized" func))
+     (put func :memoize-original-documentation (documentation func))
+     (put func 'function-documentation
+          (concat (documentation func) " (memoized)"))
+     (put func :memoize-original-function (symbol-function func))
+     (fset func (memoize--wrap (symbol-function func) timeout))
+     func)
+    (function (memoize--wrap func timeout))))
+
+(defun memoize-restore (func)
+  "Restore the original, non-memoized definition of FUNC.
+FUNC should be a symbol which has been memoized with `memoize'."
+  (unless (get func :memoize-original-function)
+    (user-error "%s is not memoized" func))
+  (fset func (get func :memoize-original-function))
+  (put func :memoize-original-function nil)
+  (put func 'function-documentation
+       (get func :memoize-original-documentation))
+  (put func :memoize-original-documentation nil))
+
+(defun memoize--wrap (func timeout)
+  "Return the memoized version of FUNC.
+TIMEOUT specifies how long the values last from last access. A
+nil timeout will cause the values to never expire, which will
+cause a memory leak as memoize is use, so use the nil value with
+care."
+  (let ((table (make-hash-table :test 'equal))
+        (timeouts (make-hash-table :test 'equal)))
+    (lambda (&rest args)
+      (let ((value (gethash args table)))
+        (unwind-protect
+            (or value (puthash args (apply func args) table))
+          (let ((existing-timer (gethash args timeouts))
+                (timeout-to-use (or timeout memoize-default-timeout)))
+            (when existing-timer
+              (cancel-timer existing-timer))
+            (when timeout-to-use
+              (puthash args
+                       (run-at-time timeout-to-use nil
+                                    (lambda ()
+                                      (remhash args table))) timeouts))))))))
+
+(defmacro defmemoize (name arglist &rest body)
+  "Create a memoize'd function. NAME, ARGLIST, DOCSTRING and BODY
+have the same meaning as in `defun'."
+  (declare (indent 2) (doc-string 3) (debug defun))
+  `(progn
+     (defun ,name ,arglist
+       ,@body)
+     (memoize (quote ,name))))
+
+(defun memoize-by-buffer-contents (func)
+    "Memoize the given function by buffer contents.
+If argument is a symbol then install the memoized function over
+the original function."
+  (cl-typecase func
+    (symbol
+     (put func 'function-documentation
+          (concat (documentation func) " (memoized by buffer contents)"))
+     (fset func (memoize-by-buffer-contents--wrap (symbol-function func)))
+     func)
+    (function (memoize-by-buffer-contents--wrap func))))
+
+(defun memoize-by-buffer-contents--wrap (func)
+  "Return the memoization based on the buffer contents of FUNC.
+
+This form of memoization will be based off the current buffer
+contents. A different memoization is stored for all buffer
+contents, although old contents and no-longer-existant buffers
+will get garbage collected."
+  ;; We need 3 tables here to properly garbage collect. First is the
+  ;; table for the memoization itself, `memoization-table'. It holds a
+  ;; cons of the content hash and the function arguments.
+  ;;
+  ;; Buffer contents change often, though, so we want these entries to
+  ;; be automatically garbage collected when the buffer changes or the
+  ;; buffer goes away. To keep the entries around, we need to tie the
+  ;; content hash to the buffer, so that the content hash string
+  ;; doesn't go away until the buffer does. We do that with the
+  ;; `buffer-to-contents-table'.
+  ;;
+  ;; But even if the buffer content does change, we need to expire the
+  ;; memoization entries for that particular buffer content. So we
+  ;; have a `contents-to-memoization-table' that we use to tie the
+  ;; content hash to the memoization conses used as keys in the
+  ;; `memoization-table'.
+  ;;
+  ;; If a buffer's value changes, we make sure the next time we put a
+  ;; new value at the `buffer-to-contents-table', which causes the
+  ;; hash string to disappear. This causes the hash-string to
+  ;; disappear from the `contents-to-memoization-table', which causes
+  ;; the memoizations based on that content string to disappear from
+  ;; the `memoization-table'.
+  (let ((memoization-table (make-hash-table :test 'equal :weakness 'key))
+        (buffer-to-contents-table (make-hash-table :weakness 'key))
+        (contents-to-memoization-table (make-hash-table :weakness 'key)))
+    (lambda (&rest args)
+      (let* ((bufhash (secure-hash 'md5 (buffer-string)))
+             (memokey (cons bufhash args))
+             (value (gethash memokey memoization-table)))
+        (or value
+            (progn
+              (puthash (current-buffer) bufhash buffer-to-contents-table)
+              (puthash bufhash memokey contents-to-memoization-table)
+              (puthash memokey (apply func args) memoization-table)))))))
+
+(defmacro defmemoize-by-buffer-contents (name arglist &rest body)
+  "Create a memoize'd-by-buffer-contents function. NAME, ARGLIST,
+DOCSTRING and BODY have the same meaning as in `defun'."
+  (declare (indent defun))
+  `(progn
+     (defun ,name ,arglist
+       ,@body)
+     (memoize-by-buffer-contents (quote ,name))))
+
+(provide 'memoize)
+
+;;; memoize.el ends here

code/persp-confs/persp-auto-save

@@ -21,10 +21,10 @@
 	   (min-pixel-height-safe . 20)
 	   (min-pixel-width-safe . 20))
 	  leaf
-	  (pixel-width . 1262)
+	  (pixel-width . 837)
-	  (pixel-height . 1262)
+	  (pixel-height . 700)
-	  (total-width . 126)
+	  (total-width . 83)
-	  (total-height . 63)
+	  (total-height . 35)
 	  (normal-height . 1.0)
 	  (normal-width . 1.0)
 	  (buffer "config.go"

code/persp-confs/persp-auto-save1

@@ -1,6 +1,8 @@
 ;; -*- mode: emacs-lisp; eval: (progn (pp-buffer) (indent-buffer)) -*-
 ((def-persp nil
-   ((def-buffer "layer-3---other.json" "c:/Users/mcros/Nextcloud/org/keyboards/pockettype/layer-3---other.json" json-mode)
+   ((def-buffer "config.go" "c:/Users/mcros/src/piframe-go/ui/config.go" go-mode)
+	(def-buffer "watchdog.go" "c:/Users/mcros/src/piframe-go/watchdog/watchdog.go" go-mode)
+	(def-buffer "layer-3---other.json" "c:/Users/mcros/Nextcloud/org/keyboards/pockettype/layer-3---other.json" json-mode)
 	(def-buffer "Readme.md" "c:/Users/mcros/Nextcloud/org/Readme.md" markdown-mode)
 	(def-buffer "blog_posts.org" "c:/Users/mcros/Nextcloud/org/blog_posts.org" org-mode)
 	(def-buffer ".owncloudsync.log" "c:/Users/mcros/Nextcloud/.owncloudsync.log" fundamental-mode)
@@ -25,7 +27,7 @@
 	  (total-height . 63)
 	  (normal-height . 1.0)
 	  (normal-width . 1.0)
-	  (buffer "layer-3---other.json"
+	  (buffer "config.go"
 			  (selected . t)
 			  (hscroll . 0)
 			  (fringes 8 8 nil nil)
@@ -33,9 +35,11 @@
 			  (scroll-bars nil 3 t nil 0 t nil)
 			  (vscroll . 0)
 			  (dedicated)
-			  (point . 528)
+			  (point . 568)
-			  (start . 1))
+			  (start . 432))
 	  (prev-buffers
+	   ("watchdog.go" 1 587)
+	   ("layer-3---other.json" 1 528)
 	   ("Readme.md" 1 1)
 	   ("blog_posts.org" 8764 8764)
 	   (".owncloudsync.log" 1 1)

code/persp-confs/persp-auto-save2

@@ -1,5 +1,10 @@
 ;; -*- mode: emacs-lisp; eval: (progn (pp-buffer) (indent-buffer)) -*-
-((def-persp nil nil
+((def-persp nil
+   ((def-buffer "layer-3---other.json" "c:/Users/mcros/Nextcloud/org/keyboards/pockettype/layer-3---other.json" json-mode)
+	(def-buffer "Readme.md" "c:/Users/mcros/Nextcloud/org/Readme.md" markdown-mode)
+	(def-buffer "blog_posts.org" "c:/Users/mcros/Nextcloud/org/blog_posts.org" org-mode)
+	(def-buffer ".owncloudsync.log" "c:/Users/mcros/Nextcloud/.owncloudsync.log" fundamental-mode)
+	(def-buffer "links.md" "c:/Users/mcros/Nextcloud/links.md" markdown-mode))
    (def-wconf
 	 (((min-height . 4)
 	   (min-width . 10)
@@ -14,13 +19,13 @@
 	   (min-pixel-height-safe . 20)
 	   (min-pixel-width-safe . 20))
 	  leaf
-	  (pixel-width . 837)
+	  (pixel-width . 1262)
-	  (pixel-height . 700)
+	  (pixel-height . 1262)
-	  (total-width . 83)
+	  (total-width . 126)
-	  (total-height . 35)
+	  (total-height . 63)
 	  (normal-height . 1.0)
 	  (normal-width . 1.0)
-	  (buffer "*scratch*"
+	  (buffer "layer-3---other.json"
 			  (selected . t)
 			  (hscroll . 0)
 			  (fringes 8 8 nil nil)
@@ -28,7 +33,13 @@
 			  (scroll-bars nil 3 t nil 0 t nil)
 			  (vscroll . 0)
 			  (dedicated)
-			  (point . 146)
+			  (point . 528)
-			  (start . 1))))
+			  (start . 1))
+	  (prev-buffers
+	   ("Readme.md" 1 1)
+	   ("blog_posts.org" 8764 8764)
+	   (".owncloudsync.log" 1 1)
+	   ("links.md" 1 3418)
+	   ("*scratch*" 1 1))))
    (def-params nil)
    t nil nil))

code/persp-confs/persp-auto-save3

@@ -29,8 +29,6 @@
 			  (vscroll . 0)
 			  (dedicated)
 			  (point . 146)
-			  (start . 1))
+			  (start . 1))))
-	  (prev-buffers
-	   ("*scratch*" 1 146))))
    (def-params nil)
    t nil nil))

common/_global.el

@@ -4,7 +4,7 @@
 (add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t)
 ;(package-initialize) ; this goes in chemacs2 init -- DO NOT UNCOMMENT
 (add-to-list 'package-selected-packages
-             '(helpful dired-rainbow dired-collapse dired-ranger dired-single all-the-icons-dired diminish persp-mode modus-themes transpose-frame use-package)
+             '(helpful dired-rainbow dired-collapse dired-ranger dired-single all-the-icons-dired ido-completing-read+ diminish persp-mode modus-themes transpose-frame use-package)
 )
 (require 'use-package)
 
@@ -31,6 +31,8 @@
 ; Set some global config
 (setq inhibit-splash-screen t) ; why do you need to tell me things i know by default
 ; Turn on ido mode (useful for buffer swaps and find file completion)
+(require 'ido-completing-read+)
+(ido-ubiquitous-mode 1)
 (setq ido-enable-flex-matching t)
 (setq ido-everywhere t)
 (ido-mode 1)

emacs.md

@@ -2,9 +2,14 @@ https://github.com/Bad-ptr/persp-mode.el
 
 https://github.com/minad/vertico
 
+capture template for week in review?
+
 ido-ubiquitous
 ido-vertical-mode
 
+verify rainbow delimineters
+verify rainbow mode
+
 add keyboard shortcuts for origami code folding (on/off/fold/unfold)
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
@@ -81,6 +86,7 @@ open scratch buffer. paste below into it as the contents then do `M-x ev-b RET`
           modus-themes
           persp-mode
           diminish
+          ido-completing-read+
           all-the-icons-dired
           dired-single
           dired-ranger

org/elpa/ido-completing-read+-20210529.1318/ido-completing-read+-autoloads.el

@@ -0,0 +1,104 @@
+;;; ido-completing-read+-autoloads.el --- automatically extracted autoloads
+;;
+;;; Code:
+
+(add-to-list 'load-path (directory-file-name
+                         (or (file-name-directory #$) (car load-path))))
+
+
+;;;### (autoloads nil "ido-completing-read+" "ido-completing-read+.el"
+;;;;;;  (0 0 0 0))
+;;; Generated autoloads from ido-completing-read+.el
+
+(defvar ido-cr+-minibuffer-depth -1 "\
+Minibuffer depth of the most recent ido-cr+ activation.
+
+If this equals the current minibuffer depth, then the minibuffer
+is currently being used by ido-cr+, and ido-cr+ features will be
+active. Otherwise, something else is using the minibuffer and
+ido-cr+ features will be deactivated to avoid interfering with
+the other command.
+
+This is set to -1 by default, since `(minibuffer-depth)' should
+never return this value.")
+
+(defvar ido-cr+-replace-completely nil "\
+If non-nil, replace `ido-completeing-read' completely with ido-cr+.
+
+Enabling this may interfere with or cause errors in other
+packages that use `ido-completing-read'. If you discover any such
+incompatibilities, please file a bug report at
+https://github.com/DarwinAwardWinner/ido-completing-read-plus/issues")
+
+(custom-autoload 'ido-cr+-replace-completely "ido-completing-read+" t)
+
+(defsubst ido-cr+-active nil "\
+Return non-nil if ido-cr+ is currently using the minibuffer." (>= ido-cr+-minibuffer-depth (minibuffer-depth)))
+
+(autoload 'ido-completing-read+ "ido-completing-read+" "\
+Ido-based method for reading from the minibuffer with completion.
+
+See `completing-read' for the meaning of the arguments.
+
+This function is a wrapper for `ido-completing-read' designed to
+be used as the value of `completing-read-function'. Importantly,
+it detects edge cases that ido cannot handle and uses normal
+completion for them.
+
+See `completing-read' for the meaning of the arguments.
+
+\(fn PROMPT COLLECTION &optional PREDICATE REQUIRE-MATCH INITIAL-INPUT HIST DEF INHERIT-INPUT-METHOD)" nil nil)
+
+(autoload 'ido-completing-read@ido-cr+-replace "ido-completing-read+" "\
+This advice allows ido-cr+ to completely replace `ido-completing-read'.
+
+See the varaible `ido-cr+-replace-completely' for more information.
+
+\(fn ORIG-FUN &rest ARGS)" nil nil)
+
+(advice-add 'ido-completing-read :around #'ido-completing-read@ido-cr+-replace)
+
+(autoload 'call-interactively@ido-cr+-record-current-command "ido-completing-read+" "\
+Let-bind the command being interactively called.
+
+See `ido-cr+-current-command' for more information.
+
+\(fn ORIG-FUN COMMAND &rest ARGS)" nil nil)
+
+(advice-add 'call-interactively :around #'call-interactively@ido-cr+-record-current-command)
+
+(defvar ido-ubiquitous-mode nil "\
+Non-nil if Ido-Ubiquitous mode is enabled.
+See the `ido-ubiquitous-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 `ido-ubiquitous-mode'.")
+
+(custom-autoload 'ido-ubiquitous-mode "ido-completing-read+" nil)
+
+(autoload 'ido-ubiquitous-mode "ido-completing-read+" "\
+Use ido completion instead of standard completion almost everywhere.
+
+If called interactively, enable Ido-Ubiquitous mode if ARG is
+positive, and disable it if ARG is zero or negative.  If called
+from Lisp, also enable the mode if ARG is omitted or nil, and
+toggle it if ARG is `toggle'; disable the mode otherwise.
+
+If this mode causes problems for a function, you can customize
+when ido completion is or is not used by customizing
+`ido-cr+-disable-list'.
+
+\(fn &optional ARG)" t nil)
+
+(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "ido-completing-read+" '("ido-" "minibuf-eldef-update-minibuffer@ido-cr+-compat")))
+
+;;;***
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; coding: utf-8
+;; End:
+;;; ido-completing-read+-autoloads.el ends here

org/elpa/ido-completing-read+-20210529.1318/ido-completing-read+-pkg.el

@@ -0,0 +1,2 @@
+;;; Generated package description from ido-completing-read+.el  -*- no-byte-compile: t -*-
+(define-package "ido-completing-read+" "20210529.1318" "A completing-read-function using ido" '((emacs "24.4") (seq "0.5") (memoize "1.1")) :commit "49e7967ea8c0ab0a206b40d70fc19be115083fa1" :authors '(("Ryan C. Thompson" . "rct@thompsonclan.org")) :maintainer '("Ryan C. Thompson" . "rct@thompsonclan.org") :keywords '("ido" "completion" "convenience") :url "https://github.com/DarwinAwardWinner/ido-completing-read-plus")

org/elpa/memoize-20200103.2036/memoize-autoloads.el

@@ -0,0 +1,22 @@
+;;; memoize-autoloads.el --- automatically extracted autoloads
+;;
+;;; Code:
+
+(add-to-list 'load-path (directory-file-name
+                         (or (file-name-directory #$) (car load-path))))
+
+
+;;;### (autoloads nil "memoize" "memoize.el" (0 0 0 0))
+;;; Generated autoloads from memoize.el
+
+(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "memoize" '("defmemoize" "memoize")))
+
+;;;***
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; coding: utf-8
+;; End:
+;;; memoize-autoloads.el ends here

org/elpa/memoize-20200103.2036/memoize-pkg.el

@@ -0,0 +1,2 @@
+;;; Generated package description from memoize.el  -*- no-byte-compile: t -*-
+(define-package "memoize" "20200103.2036" "Memoization functions" 'nil :commit "51b075935ca7070f62fae1d69fe0ff7d8fa56fdd" :authors '(("Christopher Wellons" . "mosquitopsu@gmail.com")) :maintainer '("Christopher Wellons" . "mosquitopsu@gmail.com") :url "https://github.com/skeeto/emacs-memoize")

org/elpa/memoize-20200103.2036/memoize.el

@@ -0,0 +1,190 @@
+;;; memoize.el --- Memoization functions -*- lexical-binding: t; -*-
+
+;; This is free and unencumbered software released into the public domain.
+
+;; Author: Christopher Wellons <mosquitopsu@gmail.com>
+;; URL: https://github.com/skeeto/emacs-memoize
+;; Package-Version: 20200103.2036
+;; Package-Commit: 51b075935ca7070f62fae1d69fe0ff7d8fa56fdd
+;; Version: 1.1
+
+;;; Commentary:
+
+;; `memoize' accepts a symbol or a function. When given a symbol, the
+;; symbol's function definition is memoized and installed overtop of
+;; the original function definition. When given a function, it returns
+;; a memoized version of that function.
+
+;;     (memoize 'my-expensive-function)
+
+;; `defmemoize' defines a memoized function directly, behaving just
+;; like `defun'.
+
+;;     (defmemoize my-expensive-function (n)
+;;       (if (zerop n)
+;;           1
+;;         (* n (my-expensive-function (1- n)))))
+
+;; Memoizing an interactive function will render that function
+;; non-interactive. It would be easy to fix this problem when it comes
+;; to non-byte-compiled functions, but recovering the interactive
+;; definition from a byte-compiled function is more complex than I
+;; care to deal with. Besides, interactive functions are always used
+;; for their side effects anyway.
+
+;; There's no way to memoize nil returns, but why would your expensive
+;; functions do all that work just to return nil? :-)
+
+;; Memoization takes up memory, which should be freed at some point.
+;; Because of this, all memoization has a timeout from when the last
+;; access was. The default timeout is set by
+;; `memoize-default-timeout'.  It can be overridden by using the
+;; `memoize' function, but the `defmemoize' macro will always just use
+;; the default timeout.
+
+;; If you wait to byte-compile the function until *after* it is
+;; memoized then the function and memoization wrapper both get
+;; compiled at once, so there's no special reason to do them
+;; separately. But there really isn't much advantage to compiling the
+;; memoization wrapper anyway.
+
+;;; Code:
+
+(require 'cl-lib)
+
+(defvar memoize-default-timeout "2 hours"
+  "The amount of time after which to remove a memoization.
+This represents the time after last use of the memoization after
+which the value is expired. Setting this to nil means to never
+expire, which will cause a memory leak, but may be acceptable for
+very careful uses.")
+
+(defun memoize (func &optional timeout)
+  "Memoize FUNC: a closure, lambda, or symbol.
+
+If argument is a symbol then install the memoized function over
+the original function. The TIMEOUT value, a timeout string as
+used by `run-at-time' will determine when the value expires, and
+will apply after the last access (unless another access
+happens)."
+  (cl-typecase func
+    (symbol
+     (when (get func :memoize-original-function)
+       (user-error "%s is already memoized" func))
+     (put func :memoize-original-documentation (documentation func))
+     (put func 'function-documentation
+          (concat (documentation func) " (memoized)"))
+     (put func :memoize-original-function (symbol-function func))
+     (fset func (memoize--wrap (symbol-function func) timeout))
+     func)
+    (function (memoize--wrap func timeout))))
+
+(defun memoize-restore (func)
+  "Restore the original, non-memoized definition of FUNC.
+FUNC should be a symbol which has been memoized with `memoize'."
+  (unless (get func :memoize-original-function)
+    (user-error "%s is not memoized" func))
+  (fset func (get func :memoize-original-function))
+  (put func :memoize-original-function nil)
+  (put func 'function-documentation
+       (get func :memoize-original-documentation))
+  (put func :memoize-original-documentation nil))
+
+(defun memoize--wrap (func timeout)
+  "Return the memoized version of FUNC.
+TIMEOUT specifies how long the values last from last access. A
+nil timeout will cause the values to never expire, which will
+cause a memory leak as memoize is use, so use the nil value with
+care."
+  (let ((table (make-hash-table :test 'equal))
+        (timeouts (make-hash-table :test 'equal)))
+    (lambda (&rest args)
+      (let ((value (gethash args table)))
+        (unwind-protect
+            (or value (puthash args (apply func args) table))
+          (let ((existing-timer (gethash args timeouts))
+                (timeout-to-use (or timeout memoize-default-timeout)))
+            (when existing-timer
+              (cancel-timer existing-timer))
+            (when timeout-to-use
+              (puthash args
+                       (run-at-time timeout-to-use nil
+                                    (lambda ()
+                                      (remhash args table))) timeouts))))))))
+
+(defmacro defmemoize (name arglist &rest body)
+  "Create a memoize'd function. NAME, ARGLIST, DOCSTRING and BODY
+have the same meaning as in `defun'."
+  (declare (indent 2) (doc-string 3) (debug defun))
+  `(progn
+     (defun ,name ,arglist
+       ,@body)
+     (memoize (quote ,name))))
+
+(defun memoize-by-buffer-contents (func)
+    "Memoize the given function by buffer contents.
+If argument is a symbol then install the memoized function over
+the original function."
+  (cl-typecase func
+    (symbol
+     (put func 'function-documentation
+          (concat (documentation func) " (memoized by buffer contents)"))
+     (fset func (memoize-by-buffer-contents--wrap (symbol-function func)))
+     func)
+    (function (memoize-by-buffer-contents--wrap func))))
+
+(defun memoize-by-buffer-contents--wrap (func)
+  "Return the memoization based on the buffer contents of FUNC.
+
+This form of memoization will be based off the current buffer
+contents. A different memoization is stored for all buffer
+contents, although old contents and no-longer-existant buffers
+will get garbage collected."
+  ;; We need 3 tables here to properly garbage collect. First is the
+  ;; table for the memoization itself, `memoization-table'. It holds a
+  ;; cons of the content hash and the function arguments.
+  ;;
+  ;; Buffer contents change often, though, so we want these entries to
+  ;; be automatically garbage collected when the buffer changes or the
+  ;; buffer goes away. To keep the entries around, we need to tie the
+  ;; content hash to the buffer, so that the content hash string
+  ;; doesn't go away until the buffer does. We do that with the
+  ;; `buffer-to-contents-table'.
+  ;;
+  ;; But even if the buffer content does change, we need to expire the
+  ;; memoization entries for that particular buffer content. So we
+  ;; have a `contents-to-memoization-table' that we use to tie the
+  ;; content hash to the memoization conses used as keys in the
+  ;; `memoization-table'.
+  ;;
+  ;; If a buffer's value changes, we make sure the next time we put a
+  ;; new value at the `buffer-to-contents-table', which causes the
+  ;; hash string to disappear. This causes the hash-string to
+  ;; disappear from the `contents-to-memoization-table', which causes
+  ;; the memoizations based on that content string to disappear from
+  ;; the `memoization-table'.
+  (let ((memoization-table (make-hash-table :test 'equal :weakness 'key))
+        (buffer-to-contents-table (make-hash-table :weakness 'key))
+        (contents-to-memoization-table (make-hash-table :weakness 'key)))
+    (lambda (&rest args)
+      (let* ((bufhash (secure-hash 'md5 (buffer-string)))
+             (memokey (cons bufhash args))
+             (value (gethash memokey memoization-table)))
+        (or value
+            (progn
+              (puthash (current-buffer) bufhash buffer-to-contents-table)
+              (puthash bufhash memokey contents-to-memoization-table)
+              (puthash memokey (apply func args) memoization-table)))))))
+
+(defmacro defmemoize-by-buffer-contents (name arglist &rest body)
+  "Create a memoize'd-by-buffer-contents function. NAME, ARGLIST,
+DOCSTRING and BODY have the same meaning as in `defun'."
+  (declare (indent defun))
+  `(progn
+     (defun ,name ,arglist
+       ,@body)
+     (memoize-by-buffer-contents (quote ,name))))
+
+(provide 'memoize)
+
+;;; memoize.el ends here

org/persp-confs/persp-auto-save

@@ -1,32 +1,60 @@
 ;; -*- mode: emacs-lisp; eval: (progn (pp-buffer) (indent-buffer)) -*-
 ((def-persp nil
-   ((def-buffer "_todo.org" "c:/Users/mcros/Nextcloud/org/_todo.org" org-mode)
+   ((def-buffer "_index.org" "c:/Users/mcros/Nextcloud/org/_index.org" org-mode)
-	(def-buffer "_index.org" "c:/Users/mcros/Nextcloud/org/_index.org" org-mode)
+	(def-buffer "_todo.org" "c:/Users/mcros/Nextcloud/org/_todo.org" org-mode)
 	(def-buffer "_index_phone.org" "c:/Users/mcros/Nextcloud/org/_index_phone.org" org-mode)
 	(def-buffer "_health.org" "c:/Users/mcros/Nextcloud/org/health/_health.org" org-mode)
 	(def-buffer "health_houdini.org" "c:/Users/mcros/Nextcloud/org/health/health_houdini.org" org-mode)
 	(def-buffer "health_mike.org" "c:/Users/mcros/Nextcloud/org/health/health_mike.org" org-mode))
    (def-wconf
-	 (((min-height . 4)
+	 (((min-height . 8)
 	   (min-width . 10)
-	   (min-height-ignore . 3)
+	   (min-height-ignore . 6)
 	   (min-width-ignore . 6)
-	   (min-height-safe . 1)
+	   (min-height-safe . 2)
 	   (min-width-safe . 2)
-	   (min-pixel-height . 80)
+	   (min-pixel-height . 160)
 	   (min-pixel-width . 100)
-	   (min-pixel-height-ignore . 60)
+	   (min-pixel-height-ignore . 120)
 	   (min-pixel-width-ignore . 60)
-	   (min-pixel-height-safe . 20)
+	   (min-pixel-height-safe . 40)
 	   (min-pixel-width-safe . 20))
-	  leaf
+	  vc
 	  (pixel-width . 837)
 	  (pixel-height . 700)
 	  (total-width . 83)
 	  (total-height . 35)
 	  (normal-height . 1.0)
 	  (normal-width . 1.0)
-	  (buffer "_todo.org"
+	  (combination-limit)
+	  (leaf
+	   (pixel-width . 837)
+	   (pixel-height . 300)
+	   (total-width . 83)
+	   (total-height . 15)
+	   (normal-height . 0.4411764705882353)
+	   (normal-width . 1.0)
+	   (buffer "*Org Agenda*"
+			   (selected)
+			   (hscroll . 0)
+			   (fringes 8 8 nil nil)
+			   (margins nil)
+			   (scroll-bars nil 3 t nil 0 t nil)
+			   (vscroll . 0)
+			   (dedicated . "t")
+			   (point . 1)
+			   (start . 1))
+	   (prev-buffers
+		("*scratch*" 1 1)))
+	  (leaf
+	   (last . t)
+	   (pixel-width . 837)
+	   (pixel-height . 400)
+	   (total-width . 83)
+	   (total-height . 20)
+	   (normal-height . 0.5588235294117647)
+	   (normal-width . 1.0)
+	   (buffer "_index.org"
 			   (selected . t)
 			   (hscroll . 0)
 			   (fringes 8 8 nil nil)
@@ -37,7 +65,8 @@
 			   (point . 1)
 			   (start . 1))
 	   (prev-buffers
-	   ("*Org Agenda*" 1 1142)
+		("_todo.org" 1 1)
-	   ("*scratch*" 1 1))))
+		("_index_phone.org" 1 1)
+		("*Org Agenda*" 1 1)))))
    (def-params nil)
    t nil nil))

org/persp-confs/persp-auto-save1

@@ -1,7 +1,7 @@
 ;; -*- mode: emacs-lisp; eval: (progn (pp-buffer) (indent-buffer)) -*-
 ((def-persp nil
-   ((def-buffer "_index.org" "c:/Users/mcros/Nextcloud/org/_index.org" org-mode)
+   ((def-buffer "_todo.org" "c:/Users/mcros/Nextcloud/org/_todo.org" org-mode)
-	(def-buffer "_todo.org" "c:/Users/mcros/Nextcloud/org/_todo.org" org-mode)
+	(def-buffer "_index.org" "c:/Users/mcros/Nextcloud/org/_index.org" org-mode)
 	(def-buffer "_index_phone.org" "c:/Users/mcros/Nextcloud/org/_index_phone.org" org-mode)
 	(def-buffer "_health.org" "c:/Users/mcros/Nextcloud/org/health/_health.org" org-mode)
 	(def-buffer "health_houdini.org" "c:/Users/mcros/Nextcloud/org/health/health_houdini.org" org-mode)
@@ -20,13 +20,13 @@
 	   (min-pixel-height-safe . 20)
 	   (min-pixel-width-safe . 20))
 	  leaf
-	  (pixel-width . 1262)
+	  (pixel-width . 837)
-	  (pixel-height . 1262)
+	  (pixel-height . 700)
-	  (total-width . 126)
+	  (total-width . 83)
-	  (total-height . 63)
+	  (total-height . 35)
 	  (normal-height . 1.0)
 	  (normal-width . 1.0)
-	  (buffer "*Org Agenda*"
+	  (buffer "_todo.org"
 			  (selected . t)
 			  (hscroll . 0)
 			  (fringes 8 8 nil nil)
@@ -34,7 +34,7 @@
 			  (scroll-bars nil 3 t nil 0 t nil)
 			  (vscroll . 0)
 			  (dedicated)
-			  (point . 1142)
+			  (point . 1)
 			  (start . 1))
 	  (prev-buffers
 	   ("*Org Agenda*" 1 1142)

org/persp-confs/persp-auto-save2

@@ -26,7 +26,7 @@
 	  (total-height . 63)
 	  (normal-height . 1.0)
 	  (normal-width . 1.0)
-	  (buffer "*Messages*"
+	  (buffer "*Org Agenda*"
 			  (selected . t)
 			  (hscroll . 0)
 			  (fringes 8 8 nil nil)
@@ -34,7 +34,7 @@
 			  (scroll-bars nil 3 t nil 0 t nil)
 			  (vscroll . 0)
 			  (dedicated)
-			  (point . 521)
+			  (point . 1142)
 			  (start . 1))
 	  (prev-buffers
 	   ("*Org Agenda*" 1 1142)

org/persp-confs/persp-auto-save3

@@ -7,54 +7,26 @@
 	(def-buffer "health_houdini.org" "c:/Users/mcros/Nextcloud/org/health/health_houdini.org" org-mode)
 	(def-buffer "health_mike.org" "c:/Users/mcros/Nextcloud/org/health/health_mike.org" org-mode))
    (def-wconf
-	 (((min-height . 8)
+	 (((min-height . 4)
 	   (min-width . 10)
-	   (min-height-ignore . 6)
+	   (min-height-ignore . 3)
 	   (min-width-ignore . 6)
-	   (min-height-safe . 2)
+	   (min-height-safe . 1)
 	   (min-width-safe . 2)
-	   (min-pixel-height . 160)
+	   (min-pixel-height . 80)
 	   (min-pixel-width . 100)
-	   (min-pixel-height-ignore . 120)
+	   (min-pixel-height-ignore . 60)
 	   (min-pixel-width-ignore . 60)
-	   (min-pixel-height-safe . 40)
+	   (min-pixel-height-safe . 20)
 	   (min-pixel-width-safe . 20))
-	  vc
+	  leaf
-	  (pixel-width . 837)
+	  (pixel-width . 1262)
-	  (pixel-height . 700)
+	  (pixel-height . 1262)
-	  (total-width . 83)
+	  (total-width . 126)
-	  (total-height . 35)
+	  (total-height . 63)
 	  (normal-height . 1.0)
 	  (normal-width . 1.0)
-	  (combination-limit)
+	  (buffer "*Messages*"
-	  (leaf
-	   (pixel-width . 837)
-	   (pixel-height . 309)
-	   (total-width . 83)
-	   (total-height . 15)
-	   (normal-height . 0.4414285714285714)
-	   (normal-width . 1.0)
-	   (buffer "*Org Agenda*"
-			   (selected)
-			   (hscroll . 0)
-			   (fringes 8 8 nil nil)
-			   (margins nil)
-			   (scroll-bars nil 3 t nil 0 t nil)
-			   (vscroll . 0)
-			   (dedicated . "t")
-			   (point . 1)
-			   (start . 1))
-	   (prev-buffers
-		("*scratch*" 1 1)))
-	  (leaf
-	   (last . t)
-	   (pixel-width . 837)
-	   (pixel-height . 391)
-	   (total-width . 83)
-	   (total-height . 20)
-	   (normal-height . 0.5585714285714286)
-	   (normal-width . 1.0)
-	   (buffer "*Warnings*"
 			  (selected . t)
 			  (hscroll . 0)
 			  (fringes 8 8 nil nil)
@@ -62,12 +34,10 @@
 			  (scroll-bars nil 3 t nil 0 t nil)
 			  (vscroll . 0)
 			  (dedicated)
-			   (point . 108)
+			  (point . 521)
 			  (start . 1))
 	  (prev-buffers
-		("_index.org" 1 1)
+	   ("*Org Agenda*" 1 1142)
-		("_todo.org" 1 1)
+	   ("*scratch*" 1 1))))
-		("_index_phone.org" 1 1)
-		("*Org Agenda*" 1 1)))))
    (def-params nil)
    t nil nil))