file lock specification

[Brian Palmer]

On Fri, Feb 11, 2011 at 6:14 PM, Eric S. Johansson <esj at harvee.org> wrote:

> Emacs uses #filename as the public name for locking a file. This is not
> working
> with vocola because it uses a very dumb match on ".Vcl". So, I would like
> to
> change the file name used for a lock file but I haven't found in the
> documentation yet. A pointer would be appreciated
>

This is an "auto save file" ( see (xemacs)Auto Save Files). You can redefine
make-auto-save-file-name with something like

(defvar old-autosave (symbol-function 'make-auto-save-file-name))

(defun make-auto-save-file-name (&optional file-name)
  (if (and filename
              (string-match "\\.Vcl$" file-name))
        (concat "#" (replace-in-string filename "\\." ",") "#")
      (funcall old-autosave file-name)))


Hmm, maybe that'd be cleaner as advice. Redefining make-auto-save-file-name
is sort of an ugly way to customize it; I should look at emacs's
auto-save-file-name-transforms or maybe just copy it over once the GPLv3
relicensure is done.