Show
Ignore:
Timestamp:
05/18/06 16:19:18 (3 years ago)
Author:
miyoshi
Message:

Sync up with Emacs CVS HEAD.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/lisp/hexl.el

    r4058 r4085  
    705705    (apply 'call-process-region (point-min) (point-max) 
    706706           (expand-file-name hexl-program exec-directory) 
    707            t t nil (split-string hexl-options)) 
     707           t t nil 
     708           ;; Manually encode the args, otherwise they're encoded using 
     709           ;; coding-system-for-write (i.e. buffer-file-coding-system) which 
     710           ;; may not be what we want (e.g. utf-16 on a non-utf-16 system). 
     711           (mapcar (lambda (s) (encode-coding-string s locale-coding-system)) 
     712                   (split-string hexl-options))) 
    708713    (if (> (point) (hexl-address-to-marker hexl-max-address)) 
    709714        (hexl-goto-address hexl-max-address))))