help-emacs-windows
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [h-e-w] emacs 21 and non-local filesystems


From: Alexander G. Burchell
Subject: Re: [h-e-w] emacs 21 and non-local filesystems
Date: 25 Oct 2001 09:54:10 -0700
User-agent: Gnus/5.0808 (Gnus v5.8.8) Emacs/21.0.100

I know of no new support for remote compilation (this is not
authoritative, of course!).  I have some hacks to support remote
compilation which I use:

(defvar *my-remote-compile-history* nil
  "Command history for my-remote-compile.")

;; optional so next-error will work
(setq compilation-search-path "YOUR_LOCAL_DIRECTORY")

(defun my-remote-compile (arg)
  "Perform a standard remote compilation."
  (interactive "P")
  (flet ((rsh-compile (host user command)
           (save-excursion
             (set-buffer (get-buffer-create "*compilation*"))
             (kill-region (point-min) (point-max))
             (cd-absolute remote-compile-directory)
             (compilation-mode)
             (let ((proc (start-process
                          "compilation" (get-buffer "*compilation*")
                          "c:/bin/sh.exe" "-c"
                          (format "rsh %s -l %s \"(cd %s ; %s)\""
                                  host user remote-compile-directory command))))
               (set-process-sentinel proc 'compilation-sentinel))))
         ;; See "cygwin-quote-fix.el":
         (mswindows-executable-type (program) 'dos))
    (save-some-buffers t nil)           ; don't ask for confirmation
    (if arg
        (let ((compile-command
               (read-string "Compilation command: " "make -k "
                            '*my-remote-compile-history*))
              (remote-compile-directory "YOUR_REMOTE_DIRECTORY"))
          (rsh-compile "YOUR_REMOTE_HOST" "YOUR_USER_NAME" compile-command))
      (rsh-compile "YOUR_REMOTE_HOST" "YOUR_USER_NAME"
                   (or (car *my-remote-compile-history*) "make -k")))))

;; Example:
;; YOUR_REMOTE_HOST     blurfle
;; YOUR_USER_NAME       gnu
;; YOUR_REMOTE_DIRECTORY        /usr/home/gnu/project/
;; YOUR_LOCAL_DIRECTORY         e:/project/

;; where YOUR_REMOTE_DIRECTORY is mounted as YOUR_LOCAL_DIRECTORY
;; using samba or nfs

I forget what the cygwin-quote-fix does, you can probably leave it
out.  If someone knows of a better solution, please let me know.

Best wishes,
-- 
Alexander G. Burchell
Wilshire Associates
address@hidden


*----*

This message is intended only for the use of the person(s) listed above 
as the intended recipient(s), and may contain information that is 
PRIVILEGED and CONFIDENTIAL.  If you are not an intended recipient, 
you may not read, copy, or distribute this message or any attachment.  
If you received this communication in error, please notify us immediately 
by e-mail and then delete all copies of this message and any attachments.


In addition you should be aware that ordinary (unencrypted) e-mail sent 
through the Internet is not secure. Do not send confidential or sensitive 
information, such as social security numbers, account numbers, personal 
identification numbers and passwords, to us via ordinary (unencrypted) 
e-mail. 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]