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
65e70fc4
Commit
65e70fc4
authored
Feb 05, 2001
by
Miles Bader
Browse files
(insert-image-file): When visiting an image, set `truncate-lines' to t
so that any fringe arrow looks correct.
parent
31165028
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
10 additions
and
2 deletions
+10
-2
lisp/ChangeLog
lisp/ChangeLog
+5
-0
lisp/image-file.el
lisp/image-file.el
+5
-2
No files found.
lisp/ChangeLog
View file @
65e70fc4
2001-02-05 Miles Bader <miles@gnu.org>
* image-file.el (insert-image-file): When visiting an image, also
set `truncate-lines' to t so that any fringe arrow looks correct.
2001-02-05 Kenichi Handa <handa@etl.go.jp>
* isearch.el (isearch-forward): Add description about input method
...
...
lisp/image-file.el
View file @
65e70fc4
;;; image-file.el --- Support for visiting image files
;;
;; Copyright (C) 2000 Free Software Foundation, Inc.
;; Copyright (C) 2000
, 2001
Free Software Foundation, Inc.
;;
;; Author: Miles Bader <miles@gnu.org>
;; Keywords: multimedia
...
...
@@ -129,7 +129,10 @@ the command `insert-file-contents'."
(
when
visitingp
;; Inhibit the cursor when the buffer contains only an image,
;; because cursors look very strange on top of images.
(
setq
cursor-type
nil
))))
(
setq
cursor-type
nil
)
;; This just makes the arrow displayed in the right fringe
;; area look correct when the image is wider than the window.
(
setq
truncate-lines
t
))))
rval
))
(
defun
image-file-handler
(
operation
&rest
args
)
...
...
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