Advanced Search

Return to Snippet

Revision: 6538
at May 28, 2008 14:55 by perpet
Initial Code 
(defun set-random-mode-line-background() (interactive)
  (setq ncolors (length (defined-colors)))
  (random t)
  (set-face-background 'mode-line (nth (random ncolors) (defined-colors))))
Initial URL 
set-random-mode-line-background
Initial Description 
When called, this function sets the background color of the mode-line to one of the defined colors randomly.
Initial Title 
Random mode-line color
Initial Tags 

                                

                                                            

                                    

                                        

                                        Initial Language
                                        

                                    

                                    
Emacs Lisp