Lisp HUG Maillist Archive

how to customize the IDE's theme

Hi, 

I'm customizing the IDE's theme.
I'd like to change the theme as in the picture below.
 ・green for functions&macro&special form
 ・light-green for variables
 ・white for others
 ・light black for background 


​

I found an article to change the theme.
In the article, the code is like this:

(defun set-pane-background-colors (x)
  (typecase x
    (capi:echo-area-pane
     (setf (capi:simple-pane-background x) (color:make-rgb 1.0 .67 0.67)))
    (capi:collector-pane
     (setf (capi:simple-pane-background x) (color:make-rgb .8 1.0 .8)))
    (capi:listener-pane
     (setf (capi:simple-pane-background x) (color:make-rgb .8 .8 1.0)))
    (capi:editor-pane
     (setf (capi::simple-pane-background x) (color:make-rgb .7 .7 .7)
        (capi::simple-pane-foreground x) :white))
    (capi:tab-layout
     (mapcar 'set-pane-background-colors (capi:tab-layout-panes x)))
    (capi:output-pane
     (setf (capi:simple-pane-background x) :black
        (capi::simple-pane-foreground x) :white))))


Could you tell me how to fix it?
I'd appreciate your advice.

- Hiroki N..

Re: how to customize the IDE's theme

Unable to parse email body. Email id is 14005

Re: how to customize the IDE's theme

Hi,

Take a look at this extension:
https://github.com/acelent/lw-editor-color-theme
or my fork of it
https://github.com/fourier/lw-editor-color-theme


Nog Hiroki <padds1st@gmail.com> writes:

> Hi, 
>
> I'm customizing the IDE's theme.
> I'd like to change the theme as in the picture below.
>  ・green for functions&macro&special form
>  ・light-green for variables
>  ・white for others
>  ・light black for background 
>
> *
> ​
>
> I found an article to change the theme.
> In the article, the code is like this:
>
> (defun set-pane-background-colors (x)
> (typecase x
> (capi:echo-area-pane
> (setf (capi:simple-pane-background x) (color:make-rgb 1.0 .67 0.67)))
> (capi:collector-pane
> (setf (capi:simple-pane-background x) (color:make-rgb .8 1.0 .8)))
> (capi:listener-pane
> (setf (capi:simple-pane-background x) (color:make-rgb .8 .8 1.0)))
> (capi:editor-pane
> (setf (capi::simple-pane-background x) (color:make-rgb .7 .7 .7)
> (capi::simple-pane-foreground x) :white))
> (capi:tab-layout
> (mapcar 'set-pane-background-colors (capi:tab-layout-panes x)))
> (capi:output-pane
> (setf (capi:simple-pane-background x) :black
> (capi::simple-pane-foreground x) :white))))
>
> Could you tell me how to fix it?
> I'd appreciate your advice.
>
> - Hiroki N.
>

-- 
Br,
/Alexey

_______________________________________________
Lisp Hug - the mailing list for LispWorks users
lisp-hug@lispworks.com
http://www.lispworks.com/support/lisp-hug.html


Updated at: 2020-12-10 08:32 UTC