Mailing-List: contact cygwin-help AT cygwin DOT com; run by ezmlm
List-Subscribe: <mailto:cygwin-subscribe AT cygwin DOT com>
List-Archive: <http://sources.redhat.com/ml/cygwin/>
List-Post: <mailto:cygwin AT cygwin DOT com>
List-Help: <mailto:cygwin-help AT cygwin DOT com>, <http://sources.redhat.com/ml/#faqs>
Sender: cygwin-owner AT cygwin DOT com
Mail-Followup-To: cygwin AT cygwin DOT com
Delivered-To: mailing list cygwin AT cygwin DOT com
X-Injected-Via-Gmane: http://gmane.org/
To: cygwin AT cygwin DOT com
From: Scott Evans <gse AT antisleep DOT com>
Subject: cygwin-link-mode for emacs
Date: 10 Feb 2003 17:13:14 -0500
Lines: 22
Message-ID: <lm0nn5s5.fsf@templarcorp.com>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Complaints-To: usenet AT main DOT gmane DOT org
User-Agent: Gnus/5.0808 (Gnus v5.8.8) XEmacs/21.4 (Military Intelligence (Windows))

Just found this, posted by Edward O'Connor <oconnor AT soe DOT ucsd DOT edu> on
gnu.emacs.sources.  It's a nice little hack.  He posted it or NTemacs
but it works fine in the native XEmacs too. (which I still use because
it's faster than the Cygwin XEmacs.)


;;---------------------------------------------------------------------------
(defun cygwin-link-mode ()
  (goto-char (point-max))
  (search-backward (string 0))
  (forward-char 1)
  (find-alternate-file (buffer-substring (point) (point-max))))

(add-to-list 'auto-mode-alist '("\\.lnk\\'" . cygwin-link-mode))

(provide 'cygwin-link-mode)
;;---------------------------------------------------------------------------



--
 scott evans :: www.antisleep.com


--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Bug reporting:         http://cygwin.com/bugs.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/