diff options
Diffstat (limited to 'admin')
| -rw-r--r-- | admin/ldefs-clean.el | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/admin/ldefs-clean.el b/admin/ldefs-clean.el index 33bc9e529fa..91512b4bbb7 100644 --- a/admin/ldefs-clean.el +++ b/admin/ldefs-clean.el | |||
| @@ -57,9 +57,6 @@ | |||
| 57 | 57 | ||
| 58 | 58 | ||
| 59 | (defun ldefs-clean () | 59 | (defun ldefs-clean () |
| 60 | ;; Remove CR characters produced on MS-DOS/MS-Windows systems. | 60 | (find-file "../lisp/ldefs-boot-auto.temp") |
| 61 | (let ((coding-system-for-read 'utf-8-dos)) | ||
| 62 | (find-file "../lisp/ldefs-boot-auto.temp")) | ||
| 63 | (ldefs-clean-up) | 61 | (ldefs-clean-up) |
| 64 | (let ((coding-system-for-write 'utf-8-unix)) | 62 | (write-file "ldefs-boot-auto.el")) |
| 65 | (write-file "ldefs-boot-auto.el"))) | ||