Error when trying to restore/revert activity: (wrong-type-argument stringp nil) about activities.el

[karthink]

Please keep this issue open for now -- a little busy at the moment but I plan to get to the bottom of this, or supply more details if I can't.

[alphapapa]

The backtrace will be easier to read if you evaluate the activities.el file first.

[karthink]

That makes sense, here's the updated backtrace:

Debugger entered--Lisp error: (wrong-type-argument stringp nil)
  get-buffer(nil)
  #f(compiled-function (arg0) #<bytecode 0x4f14456e10c0072>)((nil nil nil))
  funcall(#f(compiled-function (arg0) #<bytecode 0x4f14456e10c0072>) (nil nil nil))
  (let* ((key parameter) (v (funcall deserialize (map-elt parameters parameter)))) (condition-case nil (with-no-warnings (map-put! parameters key v nil)) (map-not-inplace (setq parameters (map-insert parameters key v)) v)))
  (progn (let* ((key parameter) (v (funcall deserialize (map-elt parameters parameter)))) (condition-case nil (with-no-warnings (map-put! parameters key v nil)) (map-not-inplace (setq parameters (map-insert parameters key v)) v))))
  (if (map-elt parameters parameter) (progn (let* ((key parameter) (v (funcall deserialize (map-elt parameters parameter)))) (condition-case nil (with-no-warnings (map-put! parameters key v nil)) (map-not-inplace (setq parameters (map-insert parameters key v)) v)))))
  (let ((parameter x1139) (deserialize x1141)) (if (map-elt parameters parameter) (progn (let* ((key parameter) (v (funcall deserialize (map-elt parameters parameter)))) (condition-case nil (with-no-warnings (map-put! parameters key v nil)) (map-not-inplace (setq parameters (map-insert parameters key v)) v))))))
  (let* ((x1141 (map-elt x1140 'deserialize))) (let ((parameter x1139) (deserialize x1141)) (if (map-elt parameters parameter) (progn (let* ((key parameter) (v (funcall deserialize ...))) (condition-case nil (with-no-warnings (map-put! parameters key v nil)) (map-not-inplace (setq parameters ...) v)))))))
  (progn (ignore (mapp x1140)) (let* ((x1141 (map-elt x1140 'deserialize))) (let ((parameter x1139) (deserialize x1141)) (if (map-elt parameters parameter) (progn (let* ((key parameter) (v ...)) (condition-case nil (with-no-warnings ...) (map-not-inplace ... v))))))))
  (let* ((x1139 (car-safe x1138)) (x1140 (cdr-safe x1138))) (progn (ignore (mapp x1140)) (let* ((x1141 (map-elt x1140 'deserialize))) (let ((parameter x1139) (deserialize x1141)) (if (map-elt parameters parameter) (progn (let* (... ...) (condition-case nil ... ...))))))))
  (progn (ignore (consp x1138)) (let* ((x1139 (car-safe x1138)) (x1140 (cdr-safe x1138))) (progn (ignore (mapp x1140)) (let* ((x1141 (map-elt x1140 'deserialize))) (let ((parameter x1139) (deserialize x1141)) (if (map-elt parameters parameter) (progn (let* ... ...))))))))
  (let ((x1138 (car tail))) (progn (ignore (consp x1138)) (let* ((x1139 (car-safe x1138)) (x1140 (cdr-safe x1138))) (progn (ignore (mapp x1140)) (let* ((x1141 (map-elt x1140 ...))) (let ((parameter x1139) (deserialize x1141)) (if (map-elt parameters parameter) (progn ...))))))) (setq tail (cdr tail)))
  (while tail (let ((x1138 (car tail))) (progn (ignore (consp x1138)) (let* ((x1139 (car-safe x1138)) (x1140 (cdr-safe x1138))) (progn (ignore (mapp x1140)) (let* ((x1141 ...)) (let (... ...) (if ... ...)))))) (setq tail (cdr tail))))
  (let ((tail activities-window-parameters-translators)) (while tail (let ((x1138 (car tail))) (progn (ignore (consp x1138)) (let* ((x1139 (car-safe x1138)) (x1140 (cdr-safe x1138))) (progn (ignore (mapp x1140)) (let* (...) (let ... ...))))) (setq tail (cdr tail)))))
  (progn (let ((tail activities-window-parameters-translators)) (while tail (let ((x1138 (car tail))) (progn (ignore (consp x1138)) (let* ((x1139 ...) (x1140 ...)) (progn (ignore ...) (let* ... ...)))) (setq tail (cdr tail))))) (let* ((v parameters)) (condition-case nil (with-no-warnings (map-put! attrs 'parameters v nil)) (map-not-inplace (setq attrs (map-insert attrs 'parameters v)) v))) (cons 'leaf attrs))
  (let ((parameters x1135)) (progn (let ((tail activities-window-parameters-translators)) (while tail (let ((x1138 (car tail))) (progn (ignore (consp x1138)) (let* (... ...) (progn ... ...))) (setq tail (cdr tail))))) (let* ((v parameters)) (condition-case nil (with-no-warnings (map-put! attrs 'parameters v nil)) (map-not-inplace (setq attrs (map-insert attrs 'parameters v)) v))) (cons 'leaf attrs)))
  (let* ((x1135 (map-elt attrs 'parameters))) (let ((parameters x1135)) (progn (let ((tail activities-window-parameters-translators)) (while tail (let ((x1138 ...)) (progn (ignore ...) (let* ... ...)) (setq tail (cdr tail))))) (let* ((v parameters)) (condition-case nil (with-no-warnings (map-put! attrs 'parameters v nil)) (map-not-inplace (setq attrs (map-insert attrs ... v)) v))) (cons 'leaf attrs))))
  (progn (ignore (mapp attrs)) (let* ((x1135 (map-elt attrs 'parameters))) (let ((parameters x1135)) (progn (let ((tail activities-window-parameters-translators)) (while tail (let (...) (progn ... ...) (setq tail ...)))) (let* ((v parameters)) (condition-case nil (with-no-warnings (map-put! attrs ... v nil)) (map-not-inplace (setq attrs ...) v))) (cons 'leaf attrs)))))
  (let ((attrs x1137)) (progn (ignore (mapp attrs)) (let* ((x1135 (map-elt attrs 'parameters))) (let ((parameters x1135)) (progn (let ((tail activities-window-parameters-translators)) (while tail (let ... ... ...))) (let* ((v parameters)) (condition-case nil (with-no-warnings ...) (map-not-inplace ... v))) (cons 'leaf attrs))))))
  (let* ((x1137 (cdr-safe leaf))) (let ((attrs x1137)) (progn (ignore (mapp attrs)) (let* ((x1135 (map-elt attrs 'parameters))) (let ((parameters x1135)) (progn (let (...) (while tail ...)) (let* (...) (condition-case nil ... ...)) (cons 'leaf attrs)))))))
  (progn (ignore (eq x1136 'leaf)) (let* ((x1137 (cdr-safe leaf))) (let ((attrs x1137)) (progn (ignore (mapp attrs)) (let* ((x1135 (map-elt attrs ...))) (let ((parameters x1135)) (progn (let ... ...) (let* ... ...) (cons ... attrs))))))))
  (let* ((x1136 (car-safe leaf))) (progn (ignore (eq x1136 'leaf)) (let* ((x1137 (cdr-safe leaf))) (let ((attrs x1137)) (progn (ignore (mapp attrs)) (let* ((x1135 ...)) (let (...) (progn ... ... ...))))))))
  (progn (ignore (consp leaf)) (let* ((x1136 (car-safe leaf))) (progn (ignore (eq x1136 'leaf)) (let* ((x1137 (cdr-safe leaf))) (let ((attrs x1137)) (progn (ignore (mapp attrs)) (let* (...) (let ... ...))))))))
  (closure (t) (leaf) "Translate window parameters in LEAF." (progn (ignore (consp leaf)) (let* ((x1136 (car-safe leaf))) (progn (ignore (eq x1136 'leaf)) (let* ((x1137 ...)) (let (...) (progn ... ...)))))))((leaf (last . t) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (parameters (activities-buffer . #s(activities-buffer :bookmark ("Activity: gptel" (filename . "~/.local/share/git/elpaca/repos/gptel/gptel.el") (front-context-string . "(defun gptel--sa") (rear-context-string . "kend-name)))))\n\n") (position . 23839) (last-modified 26076 6795 789859 385000) (defaults "Activity: gptel" "gptel.el")) :filename "/home/karthik/.local/share/git/elpaca/repos/gptel/..." :name "gptel.el" :local-variables nil :etc ((indirectp) (narrowedp)))) (window-preserved-size nil nil nil)) (buffer #<buffer gptel.el> (selected . t) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 23839) (start . 23839)) (next-buffers "init.el") (prev-buffers ("init.el" 20264 36480) ("gptel.el" 23839 23839) ("gptel-ollama.el" 3219 3908) ("magit: gptel" 1 1) ("inbox.org" 2163 3559) ("*Help*" 1 1) ("sim86_instruction_table.inl" 1033 1056) ("gptel-openai.el" 8061 9053) ("magit-diff: gptel" 1 1) ("ring_network_stability_notes.org" 1 51))))
  funcall((closure (t) (leaf) "Translate window parameters in LEAF." (progn (ignore (consp leaf)) (let* ((x1136 (car-safe leaf))) (progn (ignore (eq x1136 'leaf)) (let* ((x1137 ...)) (let (...) (progn ... ...))))))) (leaf (last . t) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (parameters (activities-buffer . #s(activities-buffer :bookmark ("Activity: gptel" (filename . "~/.local/share/git/elpaca/repos/gptel/gptel.el") (front-context-string . "(defun gptel--sa") (rear-context-string . "kend-name)))))\n\n") (position . 23839) (last-modified 26076 6795 789859 385000) (defaults "Activity: gptel" "gptel.el")) :filename "/home/karthik/.local/share/git/elpaca/repos/gptel/..." :name "gptel.el" :local-variables nil :etc ((indirectp) (narrowedp)))) (window-preserved-size nil nil nil)) (buffer #<buffer gptel.el> (selected . t) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 23839) (start . 23839)) (next-buffers "init.el") (prev-buffers ("init.el" 20264 36480) ("gptel.el" 23839 23839) ("gptel-ollama.el" 3219 3908) ("magit: gptel" 1 1) ("inbox.org" 2163 3559) ("*Help*" 1 1) ("sim86_instruction_table.inl" 1033 1056) ("gptel-openai.el" 8061 9053) ("magit-diff: gptel" 1 1) ("ring_network_stability_notes.org" 1 51))))
  (let ((_attrs x1126)) (funcall --cl-translate-leaf-- (funcall --cl-bufferize-leaf-- state)))
  (let* ((x1126 (cdr-safe state))) (let ((_attrs x1126)) (funcall --cl-translate-leaf-- (funcall --cl-bufferize-leaf-- state))))
  (if (eq x1125 'leaf) (let* ((x1126 (cdr-safe state))) (let ((_attrs x1126)) (funcall --cl-translate-leaf-- (funcall --cl-bufferize-leaf-- state)))) (let* ((x1127 (cdr-safe state))) (cond ((atom x1127) (let ((_key x1125)) state)) ((list state) (funcall pcase-0)))))
  (let* ((x1125 (car-safe state))) (if (eq x1125 'leaf) (let* ((x1126 (cdr-safe state))) (let ((_attrs x1126)) (funcall --cl-translate-leaf-- (funcall --cl-bufferize-leaf-- state)))) (let* ((x1127 (cdr-safe state))) (cond ((atom x1127) (let ((_key x1125)) state)) ((list state) (funcall pcase-0))))))
  (cond ((consp state) (let* ((x1125 (car-safe state))) (if (eq x1125 'leaf) (let* ((x1126 (cdr-safe state))) (let ((_attrs x1126)) (funcall --cl-translate-leaf-- (funcall --cl-bufferize-leaf-- state)))) (let* ((x1127 (cdr-safe state))) (cond ((atom x1127) (let ... state)) ((list state) (funcall pcase-0))))))) ((atom state) (let nil state)) ((list state) (funcall pcase-0)))
  (let* ((pcase-0 #'(lambda nil (mapcar --cl-bufferize-state-- state)))) (cond ((consp state) (let* ((x1125 (car-safe state))) (if (eq x1125 'leaf) (let* ((x1126 ...)) (let (...) (funcall --cl-translate-leaf-- ...))) (let* ((x1127 ...)) (cond (... ...) (... ...)))))) ((atom state) (let nil state)) ((list state) (funcall pcase-0))))
  (closure ((--cl-translate-leaf-- closure (t) (leaf) "Translate window parameters in LEAF." (progn (ignore (consp leaf)) (let* ((x1136 ...)) (progn (ignore ...) (let* ... ...))))) (--cl-bufferize-leaf-- closure (t) (leaf) "Recreate buffers in LEAF." (progn (ignore (consp leaf)) (let* ((x1133 ...)) (progn (ignore ...) (let* ... ...))))) (--cl-bufferize-state-- . #0)) (state) "Set windows' buffers in STATE." (let* ((pcase-0 #'(lambda nil (mapcar --cl-bufferize-state-- state)))) (cond ((consp state) (let* ((x1125 ...)) (if (eq x1125 ...) (let* ... ...) (let* ... ...)))) ((atom state) (let nil state)) ((list state) (funcall pcase-0)))))((leaf (last . t) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (parameters (activities-buffer . #s(activities-buffer :bookmark ("Activity: gptel" (filename . "~/.local/share/git/elpaca/repos/gptel/gptel.el") (front-context-string . "(defun gptel--sa") (rear-context-string . "kend-name)))))\n\n") (position . 23839) (last-modified 26076 6795 789859 385000) (defaults "Activity: gptel" "gptel.el")) :filename "/home/karthik/.local/share/git/elpaca/repos/gptel/..." :name "gptel.el" :local-variables nil :etc ((indirectp) (narrowedp)))) (window-preserved-size nil nil nil)) (buffer #<buffer gptel.el> (selected . t) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 23839) (start . 23839)) (next-buffers "init.el") (prev-buffers ("init.el" 20264 36480) ("gptel.el" 23839 23839) ("gptel-ollama.el" 3219 3908) ("magit: gptel" 1 1) ("inbox.org" 2163 3559) ("*Help*" 1 1) ("sim86_instruction_table.inl" 1033 1056) ("gptel-openai.el" 8061 9053) ("magit-diff: gptel" 1 1) ("ring_network_stability_notes.org" 1 51))))
  mapcar((closure ((--cl-translate-leaf-- closure (t) (leaf) "Translate window parameters in LEAF." (progn (ignore (consp leaf)) (let* ((x1136 ...)) (progn (ignore ...) (let* ... ...))))) (--cl-bufferize-leaf-- closure (t) (leaf) "Recreate buffers in LEAF." (progn (ignore (consp leaf)) (let* ((x1133 ...)) (progn (ignore ...) (let* ... ...))))) (--cl-bufferize-state-- . #1)) (state) "Set windows' buffers in STATE." (let* ((pcase-0 #'(lambda nil (mapcar --cl-bufferize-state-- state)))) (cond ((consp state) (let* ((x1125 ...)) (if (eq x1125 ...) (let* ... ...) (let* ... ...)))) ((atom state) (let nil state)) ((list state) (funcall pcase-0))))) (((min-height . 8) (min-width . 20) (min-height-ignore . 5) (min-width-ignore . 8) (min-height-safe . 2) (min-width-safe . 4) (min-pixel-height . 168) (min-pixel-width . 160) (min-pixel-height-ignore . 105) (min-pixel-width-ignore . 64) (min-pixel-height-safe . 42) (min-pixel-width-safe . 32)) hc (pixel-width . 1918) (pixel-height . 1133) (total-width . 240) (total-height . 54) (normal-height . 1.0) (normal-width . 1.0) (combination-limit . t) (vc (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (combination-limit) (leaf (pixel-width . 959) (pixel-height . 819) (total-width . 120) (total-height . 39) (normal-height . 0.7224183583406885) (normal-width . 1.0) (parameters (activities-buffer . #s(activities-buffer :bookmark ("magit: gptel" ... ... ... ... ... ... ... ... ...) :filename nil :name "magit: gptel" :local-variables nil :etc (... ...))) (no-other-window) (no-delete-other-windows) (window-side)) (buffer #<buffer magit: gptel> (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 143) (start . 1)) (prev-buffers ("magit: gptel" 1 143) ("do.org::TODO gptel: always-available diffing" 168160 168160) ("gptel" 1 98) ("Chat.org" 1 1085) ("magit-process: gptel" 1 533) ("*eshell*" 32162 32270))) (leaf (last . t) (pixel-width . 959) (pixel-height . 314) (total-width . 120) (total-height . 15) (normal-height . 0.27758164165931154) (normal-width . 1.0) (parameters (activities-buffer . #s(activities-buffer :bookmark ("Org QL View: " ... ... ... ...) :filename nil :name "*Org QL View: (and (not (done)) (parent (and (todo..." :local-variables nil :etc (... ...))) (no-other-window) (no-delete-other-windows)) (buffer #<buffer *Org QL View: (and (not (done)) (parent (and (todo PROJECT) (heading gptel))))*> (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 1) (start . 1)) (prev-buffers ("*Org QL View: (and (not (done)) (parent (and (todo..." 1 1) ("magit-diff: gptel" 1 1) ("gptel" 1 98)))) (leaf (last . t) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (parameters (activities-buffer . #s(activities-buffer :bookmark ("Activity: gptel" (filename . "~/.local/share/git/elpaca/repos/gptel/gptel.el") (front-context-string . "(defun gptel--sa") (rear-context-string . "kend-name)))))\n\n") (position . 23839) (last-modified 26076 6795 789859 385000) (defaults "Activity: gptel" "gptel.el")) :filename "/home/karthik/.local/share/git/elpaca/repos/gptel/..." :name "gptel.el" :local-variables nil :etc ((indirectp) (narrowedp)))) (window-preserved-size nil nil nil)) (buffer #<buffer gptel.el> (selected . t) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 23839) (start . 23839)) (next-buffers "init.el") (prev-buffers ("init.el" 20264 36480) ("gptel.el" 23839 23839) ("gptel-ollama.el" 3219 3908) ("magit: gptel" 1 1) ("inbox.org" 2163 3559) ("*Help*" 1 1) ("sim86_instruction_table.inl" 1033 1056) ("gptel-openai.el" 8061 9053) ("magit-diff: gptel" 1 1) ("ring_network_stability_notes.org" 1 51)))))
  (closure ((state ((min-height . 8) (min-width . 20) (min-height-ignore . 5) (min-width-ignore . 8) (min-height-safe . 2) (min-width-safe . 4) (min-pixel-height . 168) (min-pixel-width . 160) (min-pixel-height-ignore . 105) (min-pixel-width-ignore . 64) (min-pixel-height-safe . 42) (min-pixel-width-safe . 32)) hc (pixel-width . 1918) (pixel-height . 1133) (total-width . 240) (total-height . 54) (normal-height . 1.0) (normal-width . 1.0) (combination-limit . t) (vc (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (combination-limit) (leaf (pixel-width . 959) (pixel-height . 819) (total-width . 120) (total-height . 39) (normal-height . 0.7224183583406885) (normal-width . 1.0) (parameters (activities-buffer . #s(activities-buffer :bookmark ... :filename nil :name "magit: gptel" :local-variables nil :etc ...)) (no-other-window) (no-delete-other-windows) (window-side)) (buffer #<buffer magit: gptel> (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 143) (start . 1)) (prev-buffers ("magit: gptel" 1 143) ("do.org::TODO gptel: always-available diffing" 168160 168160) ("gptel" 1 98) ("Chat.org" 1 1085) ("magit-process: gptel" 1 533) ("*eshell*" 32162 32270))) (leaf (last . t) (pixel-width . 959) (pixel-height . 314) (total-width . 120) (total-height . 15) (normal-height . 0.27758164165931154) (normal-width . 1.0) (parameters (activities-buffer . #s(activities-buffer :bookmark ... :filename nil :name "*Org QL View: (and (not (done)) (parent (and (todo..." :local-variables nil :etc ...)) (no-other-window) (no-delete-other-windows)) (buffer #<buffer *Org QL View: (and (not (done)) (parent (and (todo PROJECT) (heading gptel))))*> (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 1) (start . 1)) (prev-buffers ("*Org QL View: (and (not (done)) (parent (and (todo..." 1 1) ("magit-diff: gptel" 1 1) ("gptel" 1 98)))) (leaf (last . t) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (parameters (activities-buffer . #s(activities-buffer :bookmark ("Activity: gptel" ... ... ... ... ... ...) :filename "/home/karthik/.local/share/git/elpaca/repos/gptel/..." :name "gptel.el" :local-variables nil :etc (... ...))) (window-preserved-size nil nil nil)) (buffer #<buffer gptel.el> (selected . t) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 23839) (start . 23839)) (next-buffers "init.el") (prev-buffers ("init.el" 20264 36480) ("gptel.el" 23839 23839) ("gptel-ollama.el" 3219 3908) ("magit: gptel" 1 1) ("inbox.org" 2163 3559) ("*Help*" 1 1) ("sim86_instruction_table.inl" 1033 1056) ("gptel-openai.el" 8061 9053) ("magit-diff: gptel" 1 1) ("ring_network_stability_notes.org" 1 51)))) (--cl-bufferize-state-- closure ((--cl-translate-leaf-- closure (t) (leaf) "Translate window parameters in LEAF." (progn (ignore (consp leaf)) (let* (...) (progn ... ...)))) (--cl-bufferize-leaf-- closure (t) (leaf) "Recreate buffers in LEAF." (progn (ignore (consp leaf)) (let* (...) (progn ... ...)))) #4) (state) "Set windows' buffers in STATE." (let* ((pcase-0 #'(lambda nil ...))) (cond ((consp state) (let* (...) (if ... ... ...))) ((atom state) (let nil state)) ((list state) (funcall pcase-0)))))) nil (mapcar --cl-bufferize-state-- state))()
  funcall((closure ((state ((min-height . 8) (min-width . 20) (min-height-ignore . 5) (min-width-ignore . 8) (min-height-safe . 2) (min-width-safe . 4) (min-pixel-height . 168) (min-pixel-width . 160) (min-pixel-height-ignore . 105) (min-pixel-width-ignore . 64) (min-pixel-height-safe . 42) (min-pixel-width-safe . 32)) hc (pixel-width . 1918) (pixel-height . 1133) (total-width . 240) (total-height . 54) (normal-height . 1.0) (normal-width . 1.0) (combination-limit . t) (vc (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (combination-limit) (leaf (pixel-width . 959) (pixel-height . 819) (total-width . 120) (total-height . 39) (normal-height . 0.7224183583406885) (normal-width . 1.0) (parameters (activities-buffer . ...) (no-other-window) (no-delete-other-windows) (window-side)) (buffer #<buffer magit: gptel> (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 143) (start . 1)) (prev-buffers ("magit: gptel" 1 143) ("do.org::TODO gptel: always-available diffing" 168160 168160) ("gptel" 1 98) ("Chat.org" 1 1085) ("magit-process: gptel" 1 533) ("*eshell*" 32162 32270))) (leaf (last . t) (pixel-width . 959) (pixel-height . 314) (total-width . 120) (total-height . 15) (normal-height . 0.27758164165931154) (normal-width . 1.0) (parameters (activities-buffer . ...) (no-other-window) (no-delete-other-windows)) (buffer #<buffer *Org QL View: (and (not (done)) (parent (and (todo PROJECT) (heading gptel))))*> (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 1) (start . 1)) (prev-buffers ("*Org QL View: (and (not (done)) (parent (and (todo..." 1 1) ("magit-diff: gptel" 1 1) ("gptel" 1 98)))) (leaf (last . t) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (parameters (activities-buffer . #s(activities-buffer :bookmark ... :filename "/home/karthik/.local/share/git/elpaca/repos/gptel/..." :name "gptel.el" :local-variables nil :etc ...)) (window-preserved-size nil nil nil)) (buffer #<buffer gptel.el> (selected . t) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 23839) (start . 23839)) (next-buffers "init.el") (prev-buffers ("init.el" 20264 36480) ("gptel.el" 23839 23839) ("gptel-ollama.el" 3219 3908) ("magit: gptel" 1 1) ("inbox.org" 2163 3559) ("*Help*" 1 1) ("sim86_instruction_table.inl" 1033 1056) ("gptel-openai.el" 8061 9053) ("magit-diff: gptel" 1 1) ("ring_network_stability_notes.org" 1 51)))) (--cl-bufferize-state-- closure ((--cl-translate-leaf-- closure (t) (leaf) "Translate window parameters in LEAF." (progn (ignore ...) (let* ... ...))) (--cl-bufferize-leaf-- closure (t) (leaf) "Recreate buffers in LEAF." (progn (ignore ...) (let* ... ...))) #5) (state) "Set windows' buffers in STATE." (let* ((pcase-0 #'...)) (cond ((consp state) (let* ... ...)) ((atom state) (let nil state)) ((list state) (funcall pcase-0)))))) nil (mapcar --cl-bufferize-state-- state)))
  (cond ((atom x1127) (let ((_key x1125)) state)) ((list state) (funcall pcase-0)))
  (let* ((x1127 (cdr-safe state))) (cond ((atom x1127) (let ((_key x1125)) state)) ((list state) (funcall pcase-0))))
  (if (eq x1125 'leaf) (let* ((x1126 (cdr-safe state))) (let ((_attrs x1126)) (funcall --cl-translate-leaf-- (funcall --cl-bufferize-leaf-- state)))) (let* ((x1127 (cdr-safe state))) (cond ((atom x1127) (let ((_key x1125)) state)) ((list state) (funcall pcase-0)))))
  (let* ((x1125 (car-safe state))) (if (eq x1125 'leaf) (let* ((x1126 (cdr-safe state))) (let ((_attrs x1126)) (funcall --cl-translate-leaf-- (funcall --cl-bufferize-leaf-- state)))) (let* ((x1127 (cdr-safe state))) (cond ((atom x1127) (let ((_key x1125)) state)) ((list state) (funcall pcase-0))))))
  (cond ((consp state) (let* ((x1125 (car-safe state))) (if (eq x1125 'leaf) (let* ((x1126 (cdr-safe state))) (let ((_attrs x1126)) (funcall --cl-translate-leaf-- (funcall --cl-bufferize-leaf-- state)))) (let* ((x1127 (cdr-safe state))) (cond ((atom x1127) (let ... state)) ((list state) (funcall pcase-0))))))) ((atom state) (let nil state)) ((list state) (funcall pcase-0)))
  (let* ((pcase-0 #'(lambda nil (mapcar --cl-bufferize-state-- state)))) (cond ((consp state) (let* ((x1125 (car-safe state))) (if (eq x1125 'leaf) (let* ((x1126 ...)) (let (...) (funcall --cl-translate-leaf-- ...))) (let* ((x1127 ...)) (cond (... ...) (... ...)))))) ((atom state) (let nil state)) ((list state) (funcall pcase-0))))
  (closure ((--cl-translate-leaf-- closure (t) (leaf) "Translate window parameters in LEAF." (progn (ignore (consp leaf)) (let* ((x1136 ...)) (progn (ignore ...) (let* ... ...))))) (--cl-bufferize-leaf-- closure (t) (leaf) "Recreate buffers in LEAF." (progn (ignore (consp leaf)) (let* ((x1133 ...)) (progn (ignore ...) (let* ... ...))))) (--cl-bufferize-state-- . #0)) (state) "Set windows' buffers in STATE." (let* ((pcase-0 #'(lambda nil (mapcar --cl-bufferize-state-- state)))) (cond ((consp state) (let* ((x1125 ...)) (if (eq x1125 ...) (let* ... ...) (let* ... ...)))) ((atom state) (let nil state)) ((list state) (funcall pcase-0)))))((((min-height . 8) (min-width . 20) (min-height-ignore . 5) (min-width-ignore . 8) (min-height-safe . 2) (min-width-safe . 4) (min-pixel-height . 168) (min-pixel-width . 160) (min-pixel-height-ignore . 105) (min-pixel-width-ignore . 64) (min-pixel-height-safe . 42) (min-pixel-width-safe . 32)) hc (pixel-width . 1918) (pixel-height . 1133) (total-width . 240) (total-height . 54) (normal-height . 1.0) (normal-width . 1.0) (combination-limit . t) (vc (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (combination-limit) (leaf (pixel-width . 959) (pixel-height . 819) (total-width . 120) (total-height . 39) (normal-height . 0.7224183583406885) (normal-width . 1.0) (parameters (activities-buffer . #s(activities-buffer :bookmark ("magit: gptel" ... ... ... ... ... ... ... ... ...) :filename nil :name "magit: gptel" :local-variables nil :etc (... ...))) (no-other-window) (no-delete-other-windows) (window-side)) (buffer #<buffer magit: gptel> (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 143) (start . 1)) (prev-buffers ("magit: gptel" 1 143) ("do.org::TODO gptel: always-available diffing" 168160 168160) ("gptel" 1 98) ("Chat.org" 1 1085) ("magit-process: gptel" 1 533) ("*eshell*" 32162 32270))) (leaf (last . t) (pixel-width . 959) (pixel-height . 314) (total-width . 120) (total-height . 15) (normal-height . 0.27758164165931154) (normal-width . 1.0) (parameters (activities-buffer . #s(activities-buffer :bookmark ("Org QL View: " ... ... ... ...) :filename nil :name "*Org QL View: (and (not (done)) (parent (and (todo..." :local-variables nil :etc (... ...))) (no-other-window) (no-delete-other-windows)) (buffer #<buffer *Org QL View: (and (not (done)) (parent (and (todo PROJECT) (heading gptel))))*> (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 1) (start . 1)) (prev-buffers ("*Org QL View: (and (not (done)) (parent (and (todo..." 1 1) ("magit-diff: gptel" 1 1) ("gptel" 1 98)))) (leaf (last . t) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (parameters (activities-buffer . #s(activities-buffer :bookmark ("Activity: gptel" (filename . "~/.local/share/git/elpaca/repos/gptel/gptel.el") (front-context-string . "(defun gptel--sa") (rear-context-string . "kend-name)))))\n\n") (position . 23839) (last-modified 26076 6795 789859 385000) (defaults "Activity: gptel" "gptel.el")) :filename "/home/karthik/.local/share/git/elpaca/repos/gptel/..." :name "gptel.el" :local-variables nil :etc ((indirectp) (narrowedp)))) (window-preserved-size nil nil nil)) (buffer #<buffer gptel.el> (selected . t) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 23839) (start . 23839)) (next-buffers "init.el") (prev-buffers ("init.el" 20264 36480) ("gptel.el" 23839 23839) ("gptel-ollama.el" 3219 3908) ("magit: gptel" 1 1) ("inbox.org" 2163 3559) ("*Help*" 1 1) ("sim86_instruction_table.inl" 1033 1056) ("gptel-openai.el" 8061 9053) ("magit-diff: gptel" 1 1) ("ring_network_stability_notes.org" 1 51)))))
  funcall((closure ((--cl-translate-leaf-- closure (t) (leaf) "Translate window parameters in LEAF." (progn (ignore (consp leaf)) (let* ((x1136 ...)) (progn (ignore ...) (let* ... ...))))) (--cl-bufferize-leaf-- closure (t) (leaf) "Recreate buffers in LEAF." (progn (ignore (consp leaf)) (let* ((x1133 ...)) (progn (ignore ...) (let* ... ...))))) (--cl-bufferize-state-- . #1)) (state) "Set windows' buffers in STATE." (let* ((pcase-0 #'(lambda nil (mapcar --cl-bufferize-state-- state)))) (cond ((consp state) (let* ((x1125 ...)) (if (eq x1125 ...) (let* ... ...) (let* ... ...)))) ((atom state) (let nil state)) ((list state) (funcall pcase-0))))) (((min-height . 8) (min-width . 20) (min-height-ignore . 5) (min-width-ignore . 8) (min-height-safe . 2) (min-width-safe . 4) (min-pixel-height . 168) (min-pixel-width . 160) (min-pixel-height-ignore . 105) (min-pixel-width-ignore . 64) (min-pixel-height-safe . 42) (min-pixel-width-safe . 32)) hc (pixel-width . 1918) (pixel-height . 1133) (total-width . 240) (total-height . 54) (normal-height . 1.0) (normal-width . 1.0) (combination-limit . t) (vc (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (combination-limit) (leaf (pixel-width . 959) (pixel-height . 819) (total-width . 120) (total-height . 39) (normal-height . 0.7224183583406885) (normal-width . 1.0) (parameters (activities-buffer . #s(activities-buffer :bookmark ("magit: gptel" ... ... ... ... ... ... ... ... ...) :filename nil :name "magit: gptel" :local-variables nil :etc (... ...))) (no-other-window) (no-delete-other-windows) (window-side)) (buffer #<buffer magit: gptel> (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 143) (start . 1)) (prev-buffers ("magit: gptel" 1 143) ("do.org::TODO gptel: always-available diffing" 168160 168160) ("gptel" 1 98) ("Chat.org" 1 1085) ("magit-process: gptel" 1 533) ("*eshell*" 32162 32270))) (leaf (last . t) (pixel-width . 959) (pixel-height . 314) (total-width . 120) (total-height . 15) (normal-height . 0.27758164165931154) (normal-width . 1.0) (parameters (activities-buffer . #s(activities-buffer :bookmark ("Org QL View: " ... ... ... ...) :filename nil :name "*Org QL View: (and (not (done)) (parent (and (todo..." :local-variables nil :etc (... ...))) (no-other-window) (no-delete-other-windows)) (buffer #<buffer *Org QL View: (and (not (done)) (parent (and (todo PROJECT) (heading gptel))))*> (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 1) (start . 1)) (prev-buffers ("*Org QL View: (and (not (done)) (parent (and (todo..." 1 1) ("magit-diff: gptel" 1 1) ("gptel" 1 98)))) (leaf (last . t) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (parameters (activities-buffer . #s(activities-buffer :bookmark ("Activity: gptel" (filename . "~/.local/share/git/elpaca/repos/gptel/gptel.el") (front-context-string . "(defun gptel--sa") (rear-context-string . "kend-name)))))\n\n") (position . 23839) (last-modified 26076 6795 789859 385000) (defaults "Activity: gptel" "gptel.el")) :filename "/home/karthik/.local/share/git/elpaca/repos/gptel/..." :name "gptel.el" :local-variables nil :etc ((indirectp) (narrowedp)))) (window-preserved-size nil nil nil)) (buffer #<buffer gptel.el> (selected . t) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 23839) (start . 23839)) (next-buffers "init.el") (prev-buffers ("init.el" 20264 36480) ("gptel.el" 23839 23839) ("gptel-ollama.el" 3219 3908) ("magit: gptel" 1 1) ("inbox.org" 2163 3559) ("*Help*" 1 1) ("sim86_instruction_table.inl" 1033 1056) ("gptel-openai.el" 8061 9053) ("magit-diff: gptel" 1 1) ("ring_network_stability_notes.org" 1 51)))))
  (if leaf-pos (append (cl-subseq state 0 leaf-pos) (funcall --cl-translate-leaf-- (funcall --cl-bufferize-leaf-- (cl-subseq state leaf-pos)))) (funcall --cl-bufferize-state-- state))
  (let* ((leaf-pos (and t (cl-position 'leaf state)))) (if leaf-pos (append (cl-subseq state 0 leaf-pos) (funcall --cl-translate-leaf-- (funcall --cl-bufferize-leaf-- (cl-subseq state leaf-pos)))) (funcall --cl-bufferize-state-- state)))
  (let (--cl-bufferize-state-- --cl-bufferize-leaf-- --cl-translate-leaf--) (setq --cl-bufferize-state-- #'(lambda (state) "Set windows' buffers in STATE." (let* ((pcase-0 #'...)) (cond ((consp state) (let* ... ...)) ((atom state) (let nil state)) ((list state) (funcall pcase-0)))))) (setq --cl-bufferize-leaf-- #'(lambda (leaf) "Recreate buffers in LEAF." (progn (ignore (consp leaf)) (let* ((x1133 ...)) (progn (ignore ...) (let* ... ...)))))) (setq --cl-translate-leaf-- #'(lambda (leaf) "Translate window parameters in LEAF." (progn (ignore (consp leaf)) (let* ((x1136 ...)) (progn (ignore ...) (let* ... ...)))))) (let* ((leaf-pos (and t (cl-position 'leaf state)))) (if leaf-pos (append (cl-subseq state 0 leaf-pos) (funcall --cl-translate-leaf-- (funcall --cl-bufferize-leaf-- (cl-subseq state leaf-pos)))) (funcall --cl-bufferize-state-- state))))
  activities--bufferize-window-state((((min-height . 8) (min-width . 20) (min-height-ignore . 5) (min-width-ignore . 8) (min-height-safe . 2) (min-width-safe . 4) (min-pixel-height . 168) (min-pixel-width . 160) (min-pixel-height-ignore . 105) (min-pixel-width-ignore . 64) (min-pixel-height-safe . 42) (min-pixel-width-safe . 32)) hc (pixel-width . 1918) (pixel-height . 1133) (total-width . 240) (total-height . 54) (normal-height . 1.0) (normal-width . 1.0) (combination-limit . t) (vc (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (combination-limit) (leaf (pixel-width . 959) (pixel-height . 819) (total-width . 120) (total-height . 39) (normal-height . 0.7224183583406885) (normal-width . 1.0) (parameters (activities-buffer . #s(activities-buffer :bookmark ("magit: gptel" ... ... ... ... ... ... ... ... ...) :filename nil :name "magit: gptel" :local-variables nil :etc (... ...))) (no-other-window) (no-delete-other-windows) (window-side)) (buffer #<buffer magit: gptel> (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 143) (start . 1)) (prev-buffers ("magit: gptel" 1 143) ("do.org::TODO gptel: always-available diffing" 168160 168160) ("gptel" 1 98) ("Chat.org" 1 1085) ("magit-process: gptel" 1 533) ("*eshell*" 32162 32270))) (leaf (last . t) (pixel-width . 959) (pixel-height . 314) (total-width . 120) (total-height . 15) (normal-height . 0.27758164165931154) (normal-width . 1.0) (parameters (activities-buffer . #s(activities-buffer :bookmark ("Org QL View: " ... ... ... ...) :filename nil :name "*Org QL View: (and (not (done)) (parent (and (todo..." :local-variables nil :etc (... ...))) (no-other-window) (no-delete-other-windows)) (buffer #<buffer *Org QL View: (and (not (done)) (parent (and (todo PROJECT) (heading gptel))))*> (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 1) (start . 1)) (prev-buffers ("*Org QL View: (and (not (done)) (parent (and (todo..." 1 1) ("magit-diff: gptel" 1 1) ("gptel" 1 98)))) (leaf (last . t) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (parameters (activities-buffer . #s(activities-buffer :bookmark ("Activity: gptel" (filename . "~/.local/share/git/elpaca/repos/gptel/gptel.el") (front-context-string . "(defun gptel--sa") (rear-context-string . "kend-name)))))\n\n") (position . 23839) (last-modified 26076 6795 789859 385000) (defaults "Activity: gptel" "gptel.el")) :filename "/home/karthik/.local/share/git/elpaca/repos/gptel/..." :name "gptel.el" :local-variables nil :etc ((indirectp) (narrowedp)))) (window-preserved-size nil nil nil)) (buffer #<buffer gptel.el> (selected . t) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 23839) (start . 23839)) (next-buffers "init.el") (prev-buffers ("init.el" 20264 36480) ("gptel.el" 23839 23839) ("gptel-ollama.el" 3219 3908) ("magit: gptel" 1 1) ("inbox.org" 2163 3559) ("*Help*" 1 1) ("sim86_instruction_table.inl" 1033 1056) ("gptel-openai.el" 8061 9053) ("magit-diff: gptel" 1 1) ("ring_network_stability_notes.org" 1 51)))))
  (let* ((window-persistent-parameters (append activities-window-persistent-parameters window-persistent-parameters)) (state (activities--bufferize-window-state (copy-tree state)))) (run-at-time nil nil #'(lambda nil (window-state-put state (frame-root-window)))))
  activities--windows-set((((min-height . 8) (min-width . 20) (min-height-ignore . 5) (min-width-ignore . 8) (min-height-safe . 2) (min-width-safe . 4) (min-pixel-height . 168) (min-pixel-width . 160) (min-pixel-height-ignore . 105) (min-pixel-width-ignore . 64) (min-pixel-height-safe . 42) (min-pixel-width-safe . 32)) hc (pixel-width . 1918) (pixel-height . 1133) (total-width . 240) (total-height . 54) (normal-height . 1.0) (normal-width . 1.0) (combination-limit . t) (vc (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (combination-limit) (leaf (pixel-width . 959) (pixel-height . 819) (total-width . 120) (total-height . 39) (normal-height . 0.7224183583406885) (normal-width . 1.0) (parameters (activities-buffer . #s(activities-buffer :bookmark ("magit: gptel" ... ... ... ... ... ... ... ... ...) :filename nil :name "magit: gptel" :local-variables nil :etc (... ...))) (no-other-window) (no-delete-other-windows) (window-side)) (buffer "magit: gptel" (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 143) (start . 1)) (prev-buffers ("magit: gptel" 1 143) ("do.org::TODO gptel: always-available diffing" 168160 168160) ("gptel" 1 98) ("Chat.org" 1 1085) ("magit-process: gptel" 1 533) ("*eshell*" 32162 32270))) (leaf (last . t) (pixel-width . 959) (pixel-height . 314) (total-width . 120) (total-height . 15) (normal-height . 0.27758164165931154) (normal-width . 1.0) (parameters (activities-buffer . #s(activities-buffer :bookmark ("Org QL View: " ... ... ... ...) :filename nil :name "*Org QL View: (and (not (done)) (parent (and (todo..." :local-variables nil :etc (... ...))) (no-other-window) (no-delete-other-windows)) (buffer "*Org QL View: (and (not (done)) (parent (and (todo..." (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 1) (start . 1)) (prev-buffers ("*Org QL View: (and (not (done)) (parent (and (todo..." 1 1) ("magit-diff: gptel" 1 1) ("gptel" 1 98)))) (leaf (last . t) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (parameters (activities-buffer . #s(activities-buffer :bookmark ("Activity: gptel" (filename . "~/.local/share/git/elpaca/repos/gptel/gptel.el") (front-context-string . "(defun gptel--sa") (rear-context-string . "kend-name)))))\n\n") (position . 23839) (last-modified 26076 6795 789859 385000) (defaults "Activity: gptel" "gptel.el")) :filename "/home/karthik/.local/share/git/elpaca/repos/gptel/..." :name "gptel.el" :local-variables nil :etc ((indirectp) (narrowedp)))) (window-preserved-size nil nil nil)) (buffer "gptel.el" (selected . t) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 23839) (start . 23839)) (next-buffers "init.el") (prev-buffers ("init.el" 20264 36480) ("gptel.el" 23839 23839) ("gptel-ollama.el" 3219 3908) ("magit: gptel" 1 1) ("inbox.org" 2163 3559) ("*Help*" 1 1) ("sim86_instruction_table.inl" 1033 1056) ("gptel-openai.el" 8061 9053) ("magit-diff: gptel" 1 1) ("ring_network_stability_notes.org" 1 51)))))
  (let nil (activities--windows-set (progn (or (progn (and (memq (type-of default) cl-struct-activities-activity-state-tags) t)) (signal 'wrong-type-argument (list 'activities-activity-state default))) (aref default 1))))
  (cond ((eq state 'default) (let nil (activities--windows-set (progn (or (progn (and ... t)) (signal 'wrong-type-argument (list ... default))) (aref default 1))))) ((eq state 'last) (let nil (if last (activities--windows-set (progn (or (progn ...) (signal ... ...)) (aref last 1))) (activities--windows-set (progn (or (progn ...) (signal ... ...)) (aref default 1))) (message "Activity %S has no last state.  Resuming default." name)))))
  (let ((name x1105) (default x1106) (last x1107)) (cond ((eq state 'default) (let nil (activities--windows-set (progn (or (progn ...) (signal ... ...)) (aref default 1))))) ((eq state 'last) (let nil (if last (activities--windows-set (progn (or ... ...) (aref last 1))) (activities--windows-set (progn (or ... ...) (aref default 1))) (message "Activity %S has no last state.  Resuming default." name))))))
  (let* ((x1105 (aref activity 1)) (x1106 (aref activity 2)) (x1107 (aref activity 3))) (let ((name x1105) (default x1106) (last x1107)) (cond ((eq state 'default) (let nil (activities--windows-set (progn (or ... ...) (aref default 1))))) ((eq state 'last) (let nil (if last (activities--windows-set (progn ... ...)) (activities--windows-set (progn ... ...)) (message "Activity %S has no last state.  Resuming default." name)))))))
  (progn (ignore (progn (and (memq (type-of activity) cl-struct-activities-activity-tags) t))) (let* ((x1105 (aref activity 1)) (x1106 (aref activity 2)) (x1107 (aref activity 3))) (let ((name x1105) (default x1106) (last x1107)) (cond ((eq state 'default) (let nil (activities--windows-set (progn ... ...)))) ((eq state 'last) (let nil (if last (activities--windows-set ...) (activities--windows-set ...) (message "Activity %S has no last state.  Resuming default." name))))))))
  (progn (activities--switch activity) (progn (ignore (progn (and (memq (type-of activity) cl-struct-activities-activity-tags) t))) (let* ((x1105 (aref activity 1)) (x1106 (aref activity 2)) (x1107 (aref activity 3))) (let ((name x1105) (default x1106) (last x1107)) (cond ((eq state 'default) (let nil (activities--windows-set ...))) ((eq state 'last) (let nil (if last ... ... ...))))))))
  (unwind-protect (progn (activities--switch activity) (progn (ignore (progn (and (memq (type-of activity) cl-struct-activities-activity-tags) t))) (let* ((x1105 (aref activity 1)) (x1106 (aref activity 2)) (x1107 (aref activity 3))) (let ((name x1105) (default x1106) (last x1107)) (cond ((eq state ...) (let nil ...)) ((eq state ...) (let nil ...))))))) (progn (ignore (mapp g1104)) (let* ((x1108 (map-elt g1104 :frame)) (x1109 (map-elt g1104 :window)) (x1110 (map-elt g1104 :tab-index))) (let ((frame x1108) (window x1109) (tab-index x1110)) (progn (if frame (progn (select-frame frame))) (if tab-index (progn (tab-bar-select-tab ...))) (if window (progn (select-window window))))))))
  (let ((g1104 (list ':frame (selected-frame) ':window (selected-window) ':tab-index (if (and (boundp 'tab-bar-mode) tab-bar-mode) (progn (tab-bar--current-tab-index)))))) (if (activities-activity-active-p activity) nil (error "Activity %S not active" (progn (or (progn (and (memq ... cl-struct-activities-activity-tags) t)) (signal 'wrong-type-argument (list 'activities-activity activity))) (aref activity 1)))) (unwind-protect (progn (activities--switch activity) (progn (ignore (progn (and (memq ... cl-struct-activities-activity-tags) t))) (let* ((x1105 (aref activity 1)) (x1106 (aref activity 2)) (x1107 (aref activity 3))) (let ((name x1105) (default x1106) (last x1107)) (cond (... ...) (... ...)))))) (progn (ignore (mapp g1104)) (let* ((x1108 (map-elt g1104 :frame)) (x1109 (map-elt g1104 :window)) (x1110 (map-elt g1104 :tab-index))) (let ((frame x1108) (window x1109) (tab-index x1110)) (progn (if frame (progn ...)) (if tab-index (progn ...)) (if window (progn ...))))))))
  (progn (activities--set activity) (let ((g1104 (list ':frame (selected-frame) ':window (selected-window) ':tab-index (if (and (boundp ...) tab-bar-mode) (progn (tab-bar--current-tab-index)))))) (if (activities-activity-active-p activity) nil (error "Activity %S not active" (progn (or (progn (and ... t)) (signal 'wrong-type-argument (list ... activity))) (aref activity 1)))) (unwind-protect (progn (activities--switch activity) (progn (ignore (progn (and ... t))) (let* ((x1105 ...) (x1106 ...) (x1107 ...)) (let (... ... ...) (cond ... ...))))) (progn (ignore (mapp g1104)) (let* ((x1108 (map-elt g1104 :frame)) (x1109 (map-elt g1104 :window)) (x1110 (map-elt g1104 :tab-index))) (let ((frame x1108) (window x1109) (tab-index x1110)) (progn (if frame ...) (if tab-index ...) (if window ...))))))))
  (progn (let ((--cl-keys-- --cl-rest--)) (while --cl-keys-- (cond ((memq (car --cl-keys--) '(:state :allow-other-keys)) (if (cdr --cl-keys--) nil (error "Missing argument for %s" (car --cl-keys--))) (setq --cl-keys-- (cdr (cdr --cl-keys--)))) ((car (cdr (memq ... --cl-rest--))) (setq --cl-keys-- nil)) (t (error "Keyword argument %s not one of (:state)" (car --cl-keys--)))))) (progn (activities--set activity) (let ((g1104 (list ':frame (selected-frame) ':window (selected-window) ':tab-index (if (and ... tab-bar-mode) (progn ...))))) (if (activities-activity-active-p activity) nil (error "Activity %S not active" (progn (or (progn ...) (signal ... ...)) (aref activity 1)))) (unwind-protect (progn (activities--switch activity) (progn (ignore (progn ...)) (let* (... ... ...) (let ... ...)))) (progn (ignore (mapp g1104)) (let* ((x1108 ...) (x1109 ...) (x1110 ...)) (let (... ... ...) (progn ... ... ...))))))))
  (let* ((state (car (cdr (or (plist-member --cl-rest-- ':state) '(nil last)))))) (progn (let ((--cl-keys-- --cl-rest--)) (while --cl-keys-- (cond ((memq (car --cl-keys--) '...) (if (cdr --cl-keys--) nil (error "Missing argument for %s" ...)) (setq --cl-keys-- (cdr ...))) ((car (cdr ...)) (setq --cl-keys-- nil)) (t (error "Keyword argument %s not one of (:state)" (car --cl-keys--)))))) (progn (activities--set activity) (let ((g1104 (list ':frame (selected-frame) ':window (selected-window) ':tab-index (if ... ...)))) (if (activities-activity-active-p activity) nil (error "Activity %S not active" (progn (or ... ...) (aref activity 1)))) (unwind-protect (progn (activities--switch activity) (progn (ignore ...) (let* ... ...))) (progn (ignore (mapp g1104)) (let* (... ... ...) (let ... ...))))))))
  activities-set(#s(activities-activity :name "gptel" :default #s(activities-activity-state :window-state (((min-height . 8) (min-width . 20) (min-height-ignore . 5) (min-width-ignore . 8) (min-height-safe . 2) (min-width-safe . 4) (min-pixel-height . 168) (min-pixel-width . 160) (min-pixel-height-ignore . 105) (min-pixel-width-ignore . 64) (min-pixel-height-safe . 42) (min-pixel-width-safe . 32)) hc (pixel-width . 1918) (pixel-height . 1133) (total-width . 240) (total-height . 54) (normal-height . 1.0) (normal-width . 1.0) (combination-limit . t) (vc (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (combination-limit) (leaf (pixel-width . 959) (pixel-height . 819) (total-width . 120) (total-height . 39) (normal-height . 0.7224183583406885) (normal-width . 1.0) (parameters (activities-buffer . ...) (no-other-window) (no-delete-other-windows) (window-side)) (buffer "magit: gptel" (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 143) (start . 1)) (prev-buffers ("magit: gptel" 1 143) ("do.org::TODO gptel: always-available diffing" 168160 168160) ("gptel" 1 98) ("Chat.org" 1 1085) ("magit-process: gptel" 1 533) ("*eshell*" 32162 32270))) (leaf (last . t) (pixel-width . 959) (pixel-height . 314) (total-width . 120) (total-height . 15) (normal-height . 0.27758164165931154) (normal-width . 1.0) (parameters (activities-buffer . ...) (no-other-window) (no-delete-other-windows)) (buffer "*Org QL View: (and (not (done)) (parent (and (todo..." (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 1) (start . 1)) (prev-buffers ("*Org QL View: (and (not (done)) (parent (and (todo..." 1 1) ("magit-diff: gptel" 1 1) ("gptel" 1 98)))) (leaf (last . t) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (parameters (activities-buffer . #s(activities-buffer :bookmark ... :filename "/home/karthik/.local/share/git/elpaca/repos/gptel/..." :name "gptel.el" :local-variables nil :etc ...)) (window-preserved-size nil nil nil)) (buffer "gptel.el" (selected . t) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 23839) (start . 23839)) (next-buffers "init.el") (prev-buffers ("init.el" 20264 36480) ("gptel.el" 23839 23839) ("gptel-ollama.el" 3219 3908) ("magit: gptel" 1 1) ("inbox.org" 2163 3559) ("*Help*" 1 1) ("sim86_instruction_table.inl" 1033 1056) ("gptel-openai.el" 8061 9053) ("magit-diff: gptel" 1 1) ("ring_network_stability_notes.org" 1 51)))) :etc ((time 26076 6795 789872 725000))) :last #s(activities-activity-state :window-state (((min-height . 4) (min-width . 20) (min-height-ignore . 3) (min-width-ignore . 9) (min-height-safe . 1) (min-width-safe . 4) (min-pixel-height . 84) (min-pixel-width . 160) (min-pixel-height-ignore . 44) (min-pixel-width-ignore . 66) (min-pixel-height-safe . 21) (min-pixel-width-safe . 32)) hc (pixel-width . 1918) (pixel-height . 1133) (total-width . 240) (total-height . 54) (normal-height . 1.0) (normal-width . 1.0) (combination-limit . t) (leaf (parameters (activities-buffer . #s(activities-buffer :bookmark ... :filename nil :name "[alphapapa/activities.el] Error when trying to res..." :local-variables nil :etc ...))) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (buffer "[alphapapa/activities.el] Error when trying to res..." (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 1) (start . 1)) (prev-buffers ("*Activities (error): *Customize Face: Variable Pit..." 1 80) ("gptel.el" 22490 23839) ("magit: gptel" 1 100) ("*Warnings*" 265 352))) (leaf (parameters (activities-buffer . #s(activities-buffer :bookmark ... :filename "/home/karthik/.local/share/git/elpaca/repos/gptel/..." :name "gptel-ollama.el" :local-variables nil :etc ...))) (last . t) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (buffer "gptel-ollama.el" (selected . t) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 5665) (start . 4691)) (prev-buffers ("*Org QL View: (and (not (done)) (parent (and (todo..." 1 1) ("gptel-ollama.el" 4691 5665)))) :etc ((time 26077 35738 459354 914000))) :etc nil) :state default)
  activities-revert(#s(activities-activity :name "gptel" :default #s(activities-activity-state :window-state (((min-height . 8) (min-width . 20) (min-height-ignore . 5) (min-width-ignore . 8) (min-height-safe . 2) (min-width-safe . 4) (min-pixel-height . 168) (min-pixel-width . 160) (min-pixel-height-ignore . 105) (min-pixel-width-ignore . 64) (min-pixel-height-safe . 42) (min-pixel-width-safe . 32)) hc (pixel-width . 1918) (pixel-height . 1133) (total-width . 240) (total-height . 54) (normal-height . 1.0) (normal-width . 1.0) (combination-limit . t) (vc (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (combination-limit) (leaf (pixel-width . 959) (pixel-height . 819) (total-width . 120) (total-height . 39) (normal-height . 0.7224183583406885) (normal-width . 1.0) (parameters (activities-buffer . ...) (no-other-window) (no-delete-other-windows) (window-side)) (buffer "magit: gptel" (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 143) (start . 1)) (prev-buffers ("magit: gptel" 1 143) ("do.org::TODO gptel: always-available diffing" 168160 168160) ("gptel" 1 98) ("Chat.org" 1 1085) ("magit-process: gptel" 1 533) ("*eshell*" 32162 32270))) (leaf (last . t) (pixel-width . 959) (pixel-height . 314) (total-width . 120) (total-height . 15) (normal-height . 0.27758164165931154) (normal-width . 1.0) (parameters (activities-buffer . ...) (no-other-window) (no-delete-other-windows)) (buffer "*Org QL View: (and (not (done)) (parent (and (todo..." (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 1) (start . 1)) (prev-buffers ("*Org QL View: (and (not (done)) (parent (and (todo..." 1 1) ("magit-diff: gptel" 1 1) ("gptel" 1 98)))) (leaf (last . t) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (parameters (activities-buffer . #s(activities-buffer :bookmark ... :filename "/home/karthik/.local/share/git/elpaca/repos/gptel/..." :name "gptel.el" :local-variables nil :etc ...)) (window-preserved-size nil nil nil)) (buffer "gptel.el" (selected . t) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 23839) (start . 23839)) (next-buffers "init.el") (prev-buffers ("init.el" 20264 36480) ("gptel.el" 23839 23839) ("gptel-ollama.el" 3219 3908) ("magit: gptel" 1 1) ("inbox.org" 2163 3559) ("*Help*" 1 1) ("sim86_instruction_table.inl" 1033 1056) ("gptel-openai.el" 8061 9053) ("magit-diff: gptel" 1 1) ("ring_network_stability_notes.org" 1 51)))) :etc ((time 26076 6795 789872 725000))) :last #s(activities-activity-state :window-state (((min-height . 4) (min-width . 20) (min-height-ignore . 3) (min-width-ignore . 9) (min-height-safe . 1) (min-width-safe . 4) (min-pixel-height . 84) (min-pixel-width . 160) (min-pixel-height-ignore . 44) (min-pixel-width-ignore . 66) (min-pixel-height-safe . 21) (min-pixel-width-safe . 32)) hc (pixel-width . 1918) (pixel-height . 1133) (total-width . 240) (total-height . 54) (normal-height . 1.0) (normal-width . 1.0) (combination-limit . t) (leaf (parameters (activities-buffer . #s(activities-buffer :bookmark ... :filename nil :name "[alphapapa/activities.el] Error when trying to res..." :local-variables nil :etc ...))) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (buffer "[alphapapa/activities.el] Error when trying to res..." (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 1) (start . 1)) (prev-buffers ("*Activities (error): *Customize Face: Variable Pit..." 1 80) ("gptel.el" 22490 23839) ("magit: gptel" 1 100) ("*Warnings*" 265 352))) (leaf (parameters (activities-buffer . #s(activities-buffer :bookmark ... :filename "/home/karthik/.local/share/git/elpaca/repos/gptel/..." :name "gptel-ollama.el" :local-variables nil :etc ...))) (last . t) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (buffer "gptel-ollama.el" (selected . t) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 5665) (start . 4691)) (prev-buffers ("*Org QL View: (and (not (done)) (parent (and (todo..." 1 1) ("gptel-ollama.el" 4691 5665)))) :etc ((time 26077 35738 459354 914000))) :etc nil))
  funcall-interactively(activities-revert #s(activities-activity :name "gptel" :default #s(activities-activity-state :window-state (((min-height . 8) (min-width . 20) (min-height-ignore . 5) (min-width-ignore . 8) (min-height-safe . 2) (min-width-safe . 4) (min-pixel-height . 168) (min-pixel-width . 160) (min-pixel-height-ignore . 105) (min-pixel-width-ignore . 64) (min-pixel-height-safe . 42) (min-pixel-width-safe . 32)) hc (pixel-width . 1918) (pixel-height . 1133) (total-width . 240) (total-height . 54) (normal-height . 1.0) (normal-width . 1.0) (combination-limit . t) (vc (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (combination-limit) (leaf (pixel-width . 959) (pixel-height . 819) (total-width . 120) (total-height . 39) (normal-height . 0.7224183583406885) (normal-width . 1.0) (parameters (activities-buffer . ...) (no-other-window) (no-delete-other-windows) (window-side)) (buffer "magit: gptel" (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 143) (start . 1)) (prev-buffers ("magit: gptel" 1 143) ("do.org::TODO gptel: always-available diffing" 168160 168160) ("gptel" 1 98) ("Chat.org" 1 1085) ("magit-process: gptel" 1 533) ("*eshell*" 32162 32270))) (leaf (last . t) (pixel-width . 959) (pixel-height . 314) (total-width . 120) (total-height . 15) (normal-height . 0.27758164165931154) (normal-width . 1.0) (parameters (activities-buffer . ...) (no-other-window) (no-delete-other-windows)) (buffer "*Org QL View: (and (not (done)) (parent (and (todo..." (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 1) (start . 1)) (prev-buffers ("*Org QL View: (and (not (done)) (parent (and (todo..." 1 1) ("magit-diff: gptel" 1 1) ("gptel" 1 98)))) (leaf (last . t) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (parameters (activities-buffer . #s(activities-buffer :bookmark ... :filename "/home/karthik/.local/share/git/elpaca/repos/gptel/..." :name "gptel.el" :local-variables nil :etc ...)) (window-preserved-size nil nil nil)) (buffer "gptel.el" (selected . t) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 23839) (start . 23839)) (next-buffers "init.el") (prev-buffers ("init.el" 20264 36480) ("gptel.el" 23839 23839) ("gptel-ollama.el" 3219 3908) ("magit: gptel" 1 1) ("inbox.org" 2163 3559) ("*Help*" 1 1) ("sim86_instruction_table.inl" 1033 1056) ("gptel-openai.el" 8061 9053) ("magit-diff: gptel" 1 1) ("ring_network_stability_notes.org" 1 51)))) :etc ((time 26076 6795 789872 725000))) :last #s(activities-activity-state :window-state (((min-height . 4) (min-width . 20) (min-height-ignore . 3) (min-width-ignore . 9) (min-height-safe . 1) (min-width-safe . 4) (min-pixel-height . 84) (min-pixel-width . 160) (min-pixel-height-ignore . 44) (min-pixel-width-ignore . 66) (min-pixel-height-safe . 21) (min-pixel-width-safe . 32)) hc (pixel-width . 1918) (pixel-height . 1133) (total-width . 240) (total-height . 54) (normal-height . 1.0) (normal-width . 1.0) (combination-limit . t) (leaf (parameters (activities-buffer . #s(activities-buffer :bookmark ... :filename nil :name "[alphapapa/activities.el] Error when trying to res..." :local-variables nil :etc ...))) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (buffer "[alphapapa/activities.el] Error when trying to res..." (selected) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 1) (start . 1)) (prev-buffers ("*Activities (error): *Customize Face: Variable Pit..." 1 80) ("gptel.el" 22490 23839) ("magit: gptel" 1 100) ("*Warnings*" 265 352))) (leaf (parameters (activities-buffer . #s(activities-buffer :bookmark ... :filename "/home/karthik/.local/share/git/elpaca/repos/gptel/..." :name "gptel-ollama.el" :local-variables nil :etc ...))) (last . t) (pixel-width . 959) (pixel-height . 1133) (total-width . 120) (total-height . 54) (normal-height . 1.0) (normal-width . 0.5) (buffer "gptel-ollama.el" (selected . t) (hscroll . 0) (fringes 8 8 t nil) (margins nil) (scroll-bars nil 0 t nil 0 t nil) (vscroll . 0) (dedicated) (point . 5665) (start . 4691)) (prev-buffers ("*Org QL View: (and (not (done)) (parent (and (todo..." 1 1) ("gptel-ollama.el" 4691 5665)))) :etc ((time 26077 35738 459354 914000))) :etc nil))
  command-execute(activities-revert)

[alphapapa]

That helps a little, but much of the data is elided with ellipses. I think I see where I could add an ignore-errors or something to avoid the error, but that might obscure the cause of the problem.

If you can, please unhide all of the data (I think . is bound to do that one item at a time) and post it again. (Of course you may want to inspect it, e.g. it appears to contain some filename paths.)

Alternatively, maybe we could find a time to do a video chat and you could screen-share and we could try to debug it live (the round-tripping for this kind of awkward debug data can be...well, awkward).

[alphapapa]

Sure, no problem.

[ParetoOptimalDev]

If you can, please unhide all of the data (I think . is bound to do that one item at a time) and post it again. (Of course you may want to inspect it, e.g. it appears to contain some filename paths.)

You can also (setq edebug-print-length nil) and nothing will be ellipsized IIRC.