<html><head></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><font class="Apple-style-span" size="5"><span class="Apple-style-span" style="font-size: 18px;">Thanks! This worked:</span></font><div><pre class="real"><font class="Apple-style-span" face="'Times New Roman'" size="5"><span class="Apple-style-span" style="font-size: 18px;"> (define-key osx-key-mode-map (kbd "A-&") 'my-new-function)</span></font></pre><pre class="real"><span class="Apple-style-span" style="font-family: 'Times New Roman'; white-space: normal; font-size: 18px; ">-- Pete</span></pre></div><div><br></div><div><br><div><div><div>On May 4, 2010, at 10:08 AM, David Reitter wrote:</div><br class="Apple-interchange-newline"><blockquote type="cite"><div>On May 4, 2010, at 11:33 AM, <<a href="mailto:siemsen@ucar.edu">siemsen@ucar.edu</a>> <<a href="mailto:siemsen@ucar.edu">siemsen@ucar.edu</a>> wrote:<br><br><blockquote type="cite">In Aquamacs 2-preview6, what is the Lisp syntax to map Command-Shift-7 to a function? My ~/Library/Preferences/Aquamacs Emacs/Preferences.el file contains lines like<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"> (global-set-key [f15] 'myfunction)<br></blockquote><br><a href="http://www.emacswiki.org/emacs/AquamacsFAQ#toc10">http://www.emacswiki.org/emacs/AquamacsFAQ#toc10</a><br><br><br>--<br>http://aquamacs.org -- Aquamacs: Emacs on Mac OS X<br>http://aquamacs.org/donate -- Could we help you? Return the favor and support the Aquamacs Project!</div></blockquote></div><br></div></div></body></html>