1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-18 10:16:51 +00:00
Commit Graph

20 Commits

Author SHA1 Message Date
Kim F. Storm
31da0380c3 From David Ponce <david@dponce.com>
(ruler-mode-header-line-format-old): Don't `make-variable-buffer-local'.
(ruler-mode-ruler-function): Default to `ruler-mode-ruler'.
(ruler-mode-header-line-format): Simply funcall the above.
(ruler-mode): Use `make-local-variable' and `kill-local-variable'
to save/restore a previous header line format.
(ruler-mode-space): Don't depend on a numeric WIDTH value.
(ruler-mode-ruler): Use symbolic display elements for scrollbar,
fringes and margins width.
(ruler-mode-ruler-function): Default to ruler-mode-ruler
2004-03-19 13:17:16 +00:00
Masatake YAMATO
0eeebaf5d7 2004-03-15 David Ponce <david@dponce.com>
* ruler-mode.el: (ruler-mode-left-fringe-cols)
	(ruler-mode-right-fringe-cols, ruler-mode-left-scroll-bar-cols)
	(ruler-mode-right-scroll-bar-cols): Remove.
	(ruler-mode-window-col, ruler-mode-mouse-set-left-margin)
	(ruler-mode-mouse-set-right-margin, ruler-mode-ruler): Use
	fringe-columns and scroll-bar-columns.
2004-03-15 08:39:06 +00:00
Masatake YAMATO
9fd76d04e8 2004-03-15 Masatake YAMATO <jet@gyve.org>
* hl-line.el (hl-line-range-function): New variable.
	(hl-line-move): New function.
	(global-hl-line-highlight): Use `hl-line-move'.
	(hl-line-highlight): Ditto.

	* scroll-bar.el (scroll-bar-columns): New function derived from
	ruler-mode.el.

	* fringe.el (fringe-columns): New function derived from
	ruler-mode.el.

	* ruler-mode.el (top-level): Require scroll-bar and fringe.
	(ruler-mode-left-fringe-cols)
	(ruler-mode-right-fringe-cols): Use `fringe-columns'.
	(ruler-mode-right-scroll-bar-cols)
	(ruler-mode-left-scroll-bar-cols): Use `scroll-bar-columns'.
	(ruler-mode-ruler-function): New variable.
	(ruler-mode-header-line-format): Call `ruler-mode-ruler-function'
	if the value for `ruler-mode-ruler-function'is given.

	* hexl.el (hexl-mode-hook): Make the hook customizable.
	(hexl-address-area, hexl-ascii-area, hexl-ascii-cursor): New
	customize variables.
	(hexlify-buffer): Put font-lock-faces on the address area and
	the ascii area.
	(hexl-activate-ruler): New function.
	(hexl-follow-line): New function.
	(hexl-highlight-line-range): New function.
	(hexl-mode-ruler): New function.
2004-03-15 07:27:02 +00:00
Richard M. Stallman
e539d49b44 (ruler-mode-left-fringe-cols): Add new optional
argument REAL, to return a real number instead of a rounded
integer value.  Define as inline function.
(ruler-mode-right-fringe-cols): Likewise.
(ruler-mode-scroll-bar-cols): New function.
(ruler-mode-left-scroll-bar-cols): Use it.  Define as macro.
(ruler-mode-right-scroll-bar-cols): Likewise.
(ruler-mode-space): New function.
(ruler-mode-ruler): Use it.  Handle variations of fringe style,
scroll bar mode and margins in a more robust way.
2003-10-20 23:27:52 +00:00
Dave Love
c82d88fa23 (ruler-mode-fill-column-char)
(ruler-mode-current-column-char): Use char-displayable-p, not
window-system.
2003-09-04 16:23:25 +00:00
Miles Bader
ab5796a9f9 Add arch taglines 2003-09-01 15:45:59 +00:00
Juanma Barranquero
3bb804d079 Version 1.6
Take into account changes made to the display margins, fringes and
scroll-bar handling.
(ruler-mode-margins-char): Removed.  Not used anymore.
(ruler-mode-pad-face, ruler-mode-fringes-face): New faces.
(ruler-mode-margins-face): New definition.  Moved.
(ruler-mode-left-fringe-cols)
(ruler-mode-right-fringe-cols)
(ruler-mode-left-scroll-bar-cols)
(ruler-mode-right-scroll-bar-cols): Reimplemented.  Moved.
(ruler-mode-full-window-width)
(ruler-mode-window-col): New functions.
(ruler-mode-mouse-set-left-margin)
(ruler-mode-mouse-set-right-margin)
(ruler-mode-mouse-add-tab-stop)
(ruler-mode-mouse-del-tab-stop): Reimplemented.
(ruler-mode-mouse-current-grab-object): Renamed to...
(ruler-mode-dragged-symbol): New.
(ruler-mode-mouse-grab-any-column): Use it.  Cleaned up.
(ruler-mode-mouse-drag-any-column): Likewise.
(ruler-mode-mouse-drag-any-column-iteration): Simplified.
(ruler-mode): Restore previous `header-line-format' if
`ruler-mode-header-line-format-old' has a local binding in current
buffer.
(ruler-mode-left-margin-help-echo)
(ruler-mode-right-margin-help-echo): Removed.
(ruler-mode-margin-help-echo)
(ruler-mode-fringe-help-echo): New constants.
(ruler-mode-ruler): Use them.  Reimplemented.
2003-06-01 23:07:31 +00:00
Juanma Barranquero
70ea295a11 Use new ?\s syntax instead of "? " followed by a comment. 2003-02-13 15:56:09 +00:00
Juanma Barranquero
d84e777aa1 Restore missing space and put a comment to protect it from being deleted as
trailing whitespace.
2003-02-04 17:07:42 +00:00
Juanma Barranquero
f1180544bb Trailing whitespace deleted. 2003-02-04 12:29:42 +00:00
Juanma Barranquero
60ab677b33 (ruler-mode-comment-column-char, ruler-mode-goal-column-char)
(ruler-mode-set-goal-column-ding-flag, ruler-mode-mouse-current-grab-object):
New variables.
(ruler-mode-comment-column-face, ruler-mode-goal-column-face): New faces.
(ruler-mode-mouse-set-fill-column): Removed.
(ruler-mode-mouse-grab-any-column, ruler-mode-mouse-drag-any-column-iteration)
(ruler-mode-mouse-drag-any-column): New functions.
(ruler-mode-map): [header-line down-mouse-2] Bound to
`ruler-mode-mouse-grab-any-column' instead of
`ruler-mode-mouse-set-fill-column'.
(ruler-mode): Cleanup buffer local variable `header-line-format' if it didn't
exist when `ruler-mode' was enabled.
(ruler-mode-ruler-help-echo): Updated its value.
(ruler-mode-ruler-help-echo-when-goal-column): New help string used when
goal-column is already set.
(ruler-mode-ruler-help-echo-tab): Renamed to...
(ruler-mode-ruler-help-echo-when-tab-stops): New.
(ruler-mode-fill-column-help-echo, ruler-mode-comment-column-help-echo)
(ruler-mode-goal-column-help-echo): New help strings.
(ruler-mode-ruler): Use `ruler-mode-ruler-help-echo-when-goal-column' instead of
`ruler-mode-ruler-help-echo' if `goal-column' is set. Show `comment-column' and
`goal-column'. Echo the different help string for each *-column characters on
the ruler.
2003-01-13 08:22:50 +00:00
Richard M. Stallman
1b3f70a03a (ruler-mode-left-scroll-bar-cols):
Always round scroll-bar-width parameter up.
If it is nil, use 14.
2002-09-12 03:21:21 +00:00
Richard M. Stallman
2a8f99fa7a (defgroup ruler-mode): Use `convenience' as parent. 2002-09-01 13:30:19 +00:00
Eli Zaretskii
89e7ad5946 Change all post-21.1 :version attributes to 21.4. 2002-05-12 17:30:42 +00:00
Pavel Janík
479d4d972b (ruler-mode): New keyword. Fix :version. 2002-01-19 14:01:25 +00:00
Pavel Janík
110c171f4d Fix typo. 2002-01-13 10:09:20 +00:00
Richard M. Stallman
bebb2253f6 (ruler-mode-extra-left-cols): Removed.
(ruler-mode-left-fringe-cols): New macro.
(ruler-mode-right-fringe-cols): New macro.
(ruler-mode-left-scroll-bar-cols): New macro.
(ruler-mode-right-scroll-bar-cols): New macro.
(ruler-mode-ruler): Use above new macros.
2001-12-14 07:54:28 +00:00
Richard M. Stallman
a5f7cb26ed (ruler-mode-left-fringe-cols): Variable removed.
(ruler-mode-left-fringe-cols): Function replaced by more efficient
implementation `ruler-mode-extra-left-cols'.
(ruler-mode-ruler): Use above new function.  Take into account
that the fringe areas can now be resized.
2001-12-13 07:55:49 +00:00
Richard M. Stallman
bfba6c0960 Add pagination.
(ruler-mode-toggle-show-tab-stops): No need to test `ruler-mode' variable.
2001-11-25 00:12:11 +00:00
Gerd Moellmann
4f4ff50ac9 *** empty log message *** 2001-10-09 12:10:17 +00:00