<html><head></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><div><div>On 13 sept. 2011, at 22:32, Michael Markert wrote:</div><br class="Apple-interchange-newline"><blockquote type="cite"><span class="Apple-style-span" style="border-collapse: separate; font-family: Helvetica; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: 2; text-align: -webkit-auto; text-indent: 0px; text-transform: none; white-space: normal; widows: 2; word-spacing: 0px; -webkit-border-horizontal-spacing: 0px; -webkit-border-vertical-spacing: 0px; -webkit-text-decorations-in-effect: none; -webkit-text-size-adjust: auto; -webkit-text-stroke-width: 0px; font-size: medium; "><div><blockquote type="cite">(setq evil-emacs-state-cursor '("red" box))<br></blockquote><br>I use this for `evil-default-cursor':<br><br>#+begin_src emacs_lisp<br>(defun cofi/evil-cursor ()<br> "Change cursor color according to evil-state."<br> (let ((default "OliveDrab4")<br> (cursor-colors '((insert . "dark orange")<br> (emacs . "sienna")<br> (visual . "white"))))<br> (setq cursor-type (if (eq evil-state 'visual)<br> 'hollow<br> 'bar))<br> (set-cursor-color (def-assoc evil-state cursor-colors default))))<br>#+end_src<br></div></span></blockquote></div><br><div>Hello,</div><div><br></div><div>I've tried both of these (adding them to my .emacs), and I could make neither work. Is it because I'm on Aquamacs? Or because I'm using a color theme?</div><div><br></div><div>Thanks,</div><div><br></div><div>Alan</div></body></html>