[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#35131: 27.0.50; desktop-save no longer saves register containing fra
From: |
Tadeus Prastowo |
Subject: |
bug#35131: 27.0.50; desktop-save no longer saves register containing frameset |
Date: |
Thu, 4 Apr 2019 20:37:03 +0200 |
On Thu, Apr 4, 2019 at 7:48 PM Stefan Monnier <monnier@iro.umontreal.ca> wrote:
> I installed the patch below which seems to fix it,
>
>
> Stefan
>
>
> diff --git a/lisp/desktop.el b/lisp/desktop.el
> index acabde5eb2..97c057e201 100644
> --- a/lisp/desktop.el
> +++ b/lisp/desktop.el
> @@ -856,6 +856,19 @@ desktop--v2s
> `',(cdr el) (cdr el)))
> pass1)))
> (cons 'may `[,@(mapcar #'cdr pass1)]))))
> + ((and (recordp value) (symbolp (aref value 0)))
> + (let* ((pass1 (let ((res ()))
> + (dotimes (i (length value))
> + (push (desktop--v2s (aref value i)) res))
> + (nreverse res)))
> + (special (assq nil pass1)))
> + (if special
> + (cons nil `(record
> + ,@(mapcar (lambda (el)
> + (if (eq (car el) 'must)
> + `',(cdr el) (cdr el)))
> + pass1)))
> + (cons 'may (apply #'record (mapcar #'cdr pass1))))))
> ((consp value)
> (let ((p value)
> newlist
I confirm that the patch solves the reported bug. Thank you very much
for your quick response, Stefan. I really appreciate it.
--
Best regards,
Tadeus