From 9b62de6aada7c41ef23441e02d48b262082bee5c Mon Sep 17 00:00:00 2001 From: Mauro Aranda Date: Mon, 30 Dec 2019 11:37:02 -0300 Subject: [PATCH] Preserve the 'saved-value property when doing session's customizations * lisp/custom.el (custom-variable-theme-value): Return a new list with the value of variable, so the values of the properties 'theme-value and 'saved-value are not shared. (Bug#38812) --- lisp/custom.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/custom.el b/lisp/custom.el index 26bdaae..e9bb0d3 100644 --- a/lisp/custom.el +++ b/lisp/custom.el @@ -1483,8 +1483,8 @@ custom-variable-theme-value This function returns nil if no custom theme specifies a value for VARIABLE." (let ((theme-value (get variable 'theme-value))) - (if theme-value - (cdr (car theme-value))))) + (if theme-value ; ((THEME VALUE)) + (list (cadar theme-value))))) (defun custom-theme-recalc-variable (variable) "Set VARIABLE according to currently enabled custom themes." -- 2.7.4