(setq unidata-text-file (car command-line-args-left)
command-line-args-left (cdr command-line-args-left)))
(unidata-setup-list unidata-text-file)
- (let ((coding-system-for-write 'utf-8)
+ (let ((coding-system-for-write 'utf-8-unix)
(charprop-file "charprop.el"))
(with-temp-file charprop-file
(insert ";; Automatically generated by unidata-gen.el.\n")