From af706b85fc46879468ab4e2ec8acfd212a95684e Mon Sep 17 00:00:00 2001 From: ram <ram> Date: Thu, 14 Feb 1991 20:22:05 +0000 Subject: [PATCH] In set-root-resources, changed the default for :WRITE to be #'PRINC so that it is a function, not a symbol. --- clx/resource.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/clx/resource.lisp b/clx/resource.lisp index 61ec2b34b..6795bc9d4 100644 --- a/clx/resource.lisp +++ b/clx/resource.lisp @@ -669,7 +669,7 @@ (wm-resources database window :key key :test test :test-not test-not) database)) -(defun set-root-resources (screen &key test test-not (write 'princ) database) +(defun set-root-resources (screen &key test test-not (write #'princ) database) "Changes the contents of the root window RESOURCE_MANAGER property for the given SCREEN. If SCREEN is a display, then its default screen is used. -- GitLab