     (select-frame frame)
     (my-set-frame-attrs)))
 
-(my-set-frame-attrs)
-(add-hook 'after-make-frame-functions 'my-set-frame-attrs-hook)
+;(my-set-frame-attrs)
+;(add-hook 'after-make-frame-functions 'my-set-frame-attrs-hook)
 
 (line-number-mode 1)
 (column-number-mode 1)

	 (let ((desktop (getenv "EMACS_NUMBER")))
	   (let ((minibuftitle (concat "Emacs Minibuffer" desktop)))
	     (setq
	      default-frame-alist '((minibuffer . nil))
	      initial-frame-alist 'nil
	      minibuffer-frame-alist
	      (cons (cons 'title minibuftitle)

 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(cursor ((t (:background "white" :foreground "red"))))
 '(menu ((((type x-toolkit)) (:background "grey85" :foreground "black"))))
 '(mouse ((t (:background "white" :foreground "black"))))
 '(scroll-bar ((t (:background "grey85" :foreground "red")))))
