* hexl.el (hexl-insert-char): Make display sizes other than 16 work.

This commit is contained in:
Vivek Dasmohapatra 2012-04-14 00:31:23 +02:00 committed by Lars Ingebrigtsen
parent 09b95ce39b
commit b472a59444
2 changed files with 5 additions and 5 deletions

View file

@ -1,3 +1,7 @@
2012-04-13 Vivek Dasmohapatra <vivek@etla.org>
* hexl.el (hexl-insert-char): Make display sizes other than 16 work.
2012-04-13 Masatake YAMATO <yamato@redhat.com>
* minibuffer.el (minibuffer-local-filename-syntax): New variable

View file

@ -964,11 +964,7 @@ CH must be a unibyte character whose value is between 0 and 255."
(error "Invalid character 0x%x -- must be in the range [0..255]" ch))
(let ((address (hexl-current-address t)))
(while (> num 0)
(let ((hex-position
(+ (* (/ address 16) (hexl-line-displen))
10 (point-min)
(* 2 (% address 16))
(/ (% address 16) 2)))
(let ((hex-position (hexl-address-to-marker address))
(ascii-position
(+ (* (/ address 16) (hexl-line-displen))
(hexl-ascii-start-column)