procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

subr.el (posn-col-row): Pay attention to header line. (Bug#7390)

Browse source
This commit is contained in:
Eli Zaretskii 2010-11-13 23:07:58 +02:00
parent de02effd8d
commit e68afd742f
2 changed files with 6 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/subr.el
View file

@ -955,7 +955,8 @@ and `event-end' functions."
((null spacing)
(setq spacing 0)))
(cons (/ (car pair) (frame-char-width frame))
(/ (cdr pair) (+ (frame-char-height frame) spacing))))))))
(- (/ (cdr pair) (+ (frame-char-height frame) spacing))
(if (null header-line-format) 0 1))))))))
(defun posn-actual-col-row (position)
"Return the actual column and row in POSITION, measured in characters.