.#* lock files under X, for files I edit???

[Marc Girod]

Marc Girod wrote:
> 
> I'll report my results...
> 
Here is what I did, to make it practical:

(defun clearcase-no-lock()
  "Under ClearCase, in Cygwin, do not create lock symlinks.
Either format (old: Windows shortcuts; new: real symlinks with utf name) are
bad for different reasons.
The only way to prevent this is to set the purify_flag used by emacs while
dumping...
This function is intened as a find-file-hook."
  (let ((fname (buffer-file-name)))
    (if (file-accessible-directory-p (concat fname "@@"))
	(set (make-local-variable 'purify_flag) t))))
(add-hook 'find-file-hook 'clearcase-no-lock)


Note that this would work only for 'elements' (i.e. not for
view private files) since their version tree opens as a
directory under the '@@' filename extension.
I guess it is a faster check than invoking cleartool...

Marc
-- 
View this message in context: http://www.nabble.com/.-*-lock-files-under-X%2C-for-files-I-edit----tp23655794p24495013.html
Sent from the Cygwin list mailing list archive at Nabble.com.


--
Problem reports:       http://cygwin.com/problems.html
FAQ:                   http://cygwin.com/faq/
Documentation:         http://cygwin.com/docs.html
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple