Re: how to set file coding system but using per directory variables

[Andreas Röhler]

Am 01.03.2014 13:54, schrieb Paul K:
> when I add following as first llne in a buffer it is properly interpretted
>
> -*- coding: windows-1250-dos -*-
>
>
> I don't want to add any headers to files though, so I created
> .dir-locals.el file with following content:
> ((nil . ((buffer-file-coding-system . windows-1250-dos)
>           (coding-system-for-read . windows-1250-dos)
>           (coding-system-for-write . windows-1250-dos))))
>
>
> then when I open file coding system is not automatically converted, I need
> to do extra buffer reverting for declared coding system to be applied.
>
> do You have any ideas?
>
> best regards,

Maybe needs a string - "windows-1250-dos" ?

Alternatively - Would it help to define it at the end of buffer instead?

;; Local Variables:
;; coding: windows-1250-dos
;; End:

Also employing tweaked find-file command seems possible:

(defun find-file-windows-1250-dos (filename &optional wildcards)
  "Edit file FILENAME using coding-system windows-1250-dos.

See find-file for documentation"
  (interactive
   (find-file-read-args "Find file: "
                        (confirm-nonexistent-file-or-buffer)))
  (let ((coding-system-for-read 'windows-1250-dos)
        (coding-system-for-write 'windows-1250-dos)
        (value (find-file-noselect filename nil nil wildcards)))
    (if (listp value)
        (mapcar 'switch-to-buffer (nreverse value))
      (switch-to-buffer value))))