Permalink
Browse files

Notes and functionality for Aquamacs

  • Loading branch information...
1 parent 69baa9f commit 9e4a91705d235814629b3cf744ea929fd8ac972c @topfunky committed Jul 16, 2010
Showing with 22 additions and 8 deletions.
  1. +22 −8 peepopen.el
View
@@ -31,15 +31,28 @@
;;
;; Copy this file to ~/.emacs.d/vendor/peepopen.el (or use the menu
;; item in the PeepOpen application).
+;;
+
+;; You'll also need textmate.el:
+;;
+;; $ cd ~/.emacs.d/vendor
+;; $ git clone git://github.com/defunkt/textmate.el.git
-;; $ cd ~/.emacs.d/vendor
-;; $ git clone git://github.com/defunkt/textmate.el.git
+;; Finally, require both libraries and activate textmate-mode.
+;; In most Emacs distributions, you'll do this in ~/.emacs.d/init.el
+;; or your personal configuration file.
+;;
+;; In Aquamacs, this goes in ~/Library/Preferences/Aquamacs Emacs/Preferences.el.
+
+;; (add-to-list 'load-path "~/.emacs.d/vendor/textmate.el")
+;; (require 'textmate)
+;; (add-to-list 'load-path "~/.emacs.d/vendor/")
+;; (require 'peepopen)
+;; (textmate-mode)
-;; (add-to-list 'load-path "~/.emacs.d/vendor/textmate.el")
-;; (require 'textmate)
-;; (textmate-mode)
-;; (add-to-list 'load-path "~/.emacs.d/vendor/")
-;; (require 'peepopen)
+;; For Emacs 23 or Aquamacs, use this to open files in the existing frame:
+;;
+;; (setq ns-pop-up-frames nil)
;;;###autoload
(defun peepopen-goto-file-gui ()
@@ -67,7 +80,8 @@
(defun peepopen-bind-aquamacs-keys ()
;; Need `osx-key-mode-map' to override
- (define-key osx-key-mode-map (kbd "A-t") 'peepopen-goto-file-gui))
+ (define-key osx-key-mode-map (kbd "A-t") 'peepopen-goto-file-gui)
+ (define-key *textmate-mode-map* (kbd "A-t") 'peepopen-goto-file-gui))
(defun peepopen-bind-carbon-keys ()
(define-key *textmate-mode-map* [(meta t)] 'peepopen-goto-file-gui))

0 comments on commit 9e4a917

Please sign in to comment.