Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
11aad4e9
Commit
11aad4e9
authored
Dec 12, 2010
by
Eli Zaretskii
Browse files
subr.el (posn-col-row): Evaluate header-line-format in the context of
the POSITION window's buffer.
parent
15579471
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
8 additions
and
1 deletion
+8
-1
lisp/ChangeLog
lisp/ChangeLog
+5
-0
lisp/subr.el
lisp/subr.el
+3
-1
No files found.
lisp/ChangeLog
View file @
11aad4e9
2010-12-12 Eli Zaretskii <eliz@gnu.org>
* subr.el (posn-col-row): Evaluate header-line-format in the
context of the POSITION window's buffer.
2010-12-11 Glenn Morris <rgm@gnu.org>
* subr.el (member-ignore-case, run-mode-hooks, insert-for-yank-1)
...
...
lisp/subr.el
View file @
11aad4e9
...
...
@@ -958,7 +958,9 @@ and `event-end' functions."
(
setq
spacing
0
)))
(
cons
(
/
(
car
pair
)
(
frame-char-width
frame
))
(
-
(
/
(
cdr
pair
)
(
+
(
frame-char-height
frame
)
spacing
))
(
if
(
null
header-line-format
)
0
1
))))))))
(
if
(
null
(
with-current-buffer
(
window-buffer
window
)
header-line-format
))
0
1
))))))))
(
defun
posn-actual-col-row
(
position
)
"Return the actual column and row in POSITION, measured in characters.
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment