visually mark off 80th column?

visually mark off 80th column?

[Brendan Miller]

In my other editors I always turn on a little line that delimits the
80th column. How do I do this in emacs?

I'm on emacs 23, with gnome integration on ubuntu.

RE: visually mark off 80th column?

[Drew Adams]

> In my other editors I always turn on a little line that delimits the
> 80th column. How do I do this in emacs?

http://www.emacswiki.org/emacs/FindLongLines#ShowLongLines

Re: visually mark off 80th column?

[Brendan Miller]

I installed ColumnMarker from here:
http://www.emacswiki.org/emacs/ColumnMarker

into ~/emacs and then put this in my emacs file to always highlight
the 80th column:
(add-to-list 'load-path "~/emacs/")
(require 'column-marker)
(column-marker-1 80)

However this does nothing.

If I m-x column-marker-1 it simply highlights the current line...

anyone know what's going on? I almost never touch elisp.

Brendan

On Thu, Jan 21, 2010 at 5:53 PM, Drew Adams <drew.adams@oracle.com> wrote:
>> In my other editors I always turn on a little line that delimits the
>> 80th column. How do I do this in emacs?
>
> http://www.emacswiki.org/emacs/FindLongLines#ShowLongLines
>
>

RE: visually mark off 80th column?

[Drew Adams]

> On Thu, Jan 21, 2010 at 5:53 PM, Drew Adams wrote:
> >> In my other editors I always turn on a little line that 
> >> delimits the 80th column. How do I do this in emacs?
> >
> > http://www.emacswiki.org/emacs/FindLongLines#ShowLongLines
> 
> I installed ColumnMarker from here:
> http://www.emacswiki.org/emacs/ColumnMarker
> into ~/emacs and then put this in my emacs file to always highlight
> the 80th column:
>
> (add-to-list 'load-path "~/emacs/")
> (require 'column-marker)
> (column-marker-1 80)
> 
> However this does nothing.

Hm. Works for me.

Do you actually have lines longer than 80 chars? ;-)
If not, try using (column-marker 30) as a test.

What happens if you do this interactively (in a buffer with long lines)?

M-: (column-marker-1 80)

> If I m-x column-marker-1 it simply highlights the current line...

That's the expected behavior.

If it works for you interactively like that, there's no reason it shouldn't also
work for you in your .emacs.

If it really doesn't work, try (a) loading column-marker.el (not *.elc), then
(b) `M-x debug-on-entry column-marker-1', and step through the execution using
`d', to see what happens.


BTW, if you want the highlighting only for certain modes, then use the mode hook
functions to turn it on there:

(add-hook 'foo-mode-hook
          (lambda ()
            (interactive)
            (column-marker-1 80)))

Fwd: visually mark off 80th column?

[Brendan Miller]

Er, woops I forgot to cc the list.

---------- Forwarded message ----------
From: Brendan Miller <catphive@catphive.net>
Date: Fri, Jan 22, 2010 at 1:33 PM
Subject: Re: visually mark off 80th column?
To: Drew Adams <drew.adams@oracle.com>


M-: (column-marker-1 80)

*does* work, but for some reason just having:

(add-to-list 'load-path "~/emacs/")
(require 'column-marker)
(column-marker-1 80)

In my .emacs file does nothing! Very confusing. I'll post my whole
.emacs file at the end, just in case I'm doing something that
conflicts...

I also notice that when I type M-: (column-marker-1 80) it only
highlights the part of the column that have characters, which isn't
really what I want. Is there any way to make this highlight the whole
column?

This is my complete ~/.emacs file running on emacs 23:

(custom-set-variables
 ;; custom-set-variables was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(column-number-mode t)
 '(initial-buffer-choice nil)
 '(scroll-bar-mode (quote right)))
(custom-set-faces
 ;; custom-set-faces was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 )
(setq inhibit-splash-screen t)
(add-to-list 'load-path "~/emacs/")
(require 'column-marker)
(column-marker-1 80)

;; tabbar
(require 'tabbar)
(tabbar-mode)
(global-set-key [(s-right)] 'tabbar-forward)
(global-set-key [(s-left)] 'tabbar-backward)

;; try to get clipboard working
; stops selection with a mouse being immediately injected to the kill ring
(setq mouse-drag-copy-region nil)
; stops killing/yanking interacting with primary X11 selection
(setq x-select-enable-primary nil)
; makes killing/yanking interact with clipboard X11 selection
(setq x-select-enable-clipboard t)


;; supposedly this part may be stopped by a bug...
;  active region sets primary X11 selection
(setq select-active-regions t)
; make mouse middle-click only paste from primary X11 selection, not
clipboard and kill ring.
(global-set-key [mouse-2] 'mouse-yank-primary)

On Fri, Jan 22, 2010 at 11:41 AM, Drew Adams <drew.adams@oracle.com> wrote:
>> On Thu, Jan 21, 2010 at 5:53 PM, Drew Adams wrote:
>> >> In my other editors I always turn on a little line that
>> >> delimits the 80th column. How do I do this in emacs?
>> >
>> > http://www.emacswiki.org/emacs/FindLongLines#ShowLongLines
>>
>> I installed ColumnMarker from here:
>> http://www.emacswiki.org/emacs/ColumnMarker
>> into ~/emacs and then put this in my emacs file to always highlight
>> the 80th column:
>>
>> (add-to-list 'load-path "~/emacs/")
>> (require 'column-marker)
>> (column-marker-1 80)
>>
>> However this does nothing.
>
> Hm. Works for me.
>
> Do you actually have lines longer than 80 chars? ;-)
> If not, try using (column-marker 30) as a test.
>
> What happens if you do this interactively (in a buffer with long lines)?
>
> M-: (column-marker-1 80)
>
>> If I m-x column-marker-1 it simply highlights the current line...
>
> That's the expected behavior.
>
> If it works for you interactively like that, there's no reason it shouldn't also
> work for you in your .emacs.
>
> If it really doesn't work, try (a) loading column-marker.el (not *.elc), then
> (b) `M-x debug-on-entry column-marker-1', and step through the execution using
> `d', to see what happens.
>
>
> BTW, if you want the highlighting only for certain modes, then use the mode hook
> functions to turn it on there:
>
> (add-hook 'foo-mode-hook
>          (lambda ()
>            (interactive)
>            (column-marker-1 80)))
>
>

RE: visually mark off 80th column?

[Drew Adams]

> M-: (column-marker-1 80)
> *does* work, but for some reason just having:
> (add-to-list 'load-path "~/emacs/")
> (require 'column-marker)
> (column-marker-1 80)
>
> In my .emacs file does nothing! Very confusing. I'll post my whole
> .emacs file at the end, just in case I'm doing something that
> conflicts...

The reason is because `column-marker' is local to the current buffer. Doing what
you did sets it (only) for the buffer that is current during loading of your
.emacs.

Set it in a mode hook, as I suggested, to turn it on automatically for any
buffer of a particular mode. This is described in the file header.
 
> I also notice that when I type M-: (column-marker-1 80) it only
> highlights the part of the column that have characters, which isn't
> really what I want. Is there any way to make this highlight the whole
> column?

Not that I know of.

But you might be able to use `vline.el' (with `vline-style' = `compose') to do
what you want. You will need to create a command that pins the highlighting to a
particular column.

Re: visually mark off 80th column?

[Brendan Miller]

vline would be ideal... but I don't see a way to pin highlighting to
the 80th column.

Based on this thread and some others I've come up with this using the
highlight-80+ package.

;; highlight all characters past 80
(require 'highlight-80+)
(dolist (hook '(emacs-lisp-mode-hook
                cperl-mode-hook
                shell-mode-hook
                text-mode-hook
                change-log-mode-hook
                makefile-mode-hook
                message-mode-hook
                texinfo-mode-hook
		c-mode-common-hook
		python-mode-hook))
  (add-hook hook
	    '(lambda () (highlight-80+-mode))))

One minor point, is I really want this to apply to *all* modes, not
just the ones I thought to list here. Is there any global mode hook
that applies to everything? The only files I would ever edit with
emacs would have the 80 line rule apply to them i.e. I don't do word
processing in emacs.

On Fri, Jan 22, 2010 at 2:28 PM, Drew Adams <drew.adams@oracle.com> wrote:
>> M-: (column-marker-1 80)
>> *does* work, but for some reason just having:
>> (add-to-list 'load-path "~/emacs/")
>> (require 'column-marker)
>> (column-marker-1 80)
>>
>> In my .emacs file does nothing! Very confusing. I'll post my whole
>> .emacs file at the end, just in case I'm doing something that
>> conflicts...
>
> The reason is because `column-marker' is local to the current buffer. Doing what
> you did sets it (only) for the buffer that is current during loading of your
> .emacs.
>
> Set it in a mode hook, as I suggested, to turn it on automatically for any
> buffer of a particular mode. This is described in the file header.
>
>> I also notice that when I type M-: (column-marker-1 80) it only
>> highlights the part of the column that have characters, which isn't
>> really what I want. Is there any way to make this highlight the whole
>> column?
>
> Not that I know of.
>
> But you might be able to use `vline.el' (with `vline-style' = `compose') to do
> what you want. You will need to create a command that pins the highlighting to a
> particular column.
>
>

RE: visually mark off 80th column?

[Drew Adams]

> vline would be ideal... but I don't see a way to pin highlighting to
> the 80th column.

You'd have to write a bit of Elisp code, no doubt. I don't have time to look
into it for you, but maybe someone else is interested.

> I've come up with this using the highlight-80+ package.
> (require 'highlight-80+)
> (dolist (hook '(emacs-lisp-mode-hook ... python-mode-hook))
>   (add-hook hook
> 	    '(lambda () (highlight-80+-mode))))

I'm not familiar with highlight-80+. But you can do the same thing with
column-number.

> I really want this to apply to *all* modes, not
> just the ones I thought to list here. Is there any global mode hook
> that applies to everything?

Dunno. It might depend on your Emacs version.
Perhaps someone else has a good answer. 
Maybe `after-change-major-mode-hook'.

Re: visually mark off 80th column?

[Kevin Rodgers]

Brendan Miller wrote:
> vline would be ideal... but I don't see a way to pin highlighting to
> the 80th column.
> 
> Based on this thread and some others I've come up with this using the
> highlight-80+ package.
> 
> ;; highlight all characters past 80
> (require 'highlight-80+)
> (dolist (hook '(emacs-lisp-mode-hook
>                 cperl-mode-hook
>                 shell-mode-hook
>                 text-mode-hook
>                 change-log-mode-hook
>                 makefile-mode-hook
>                 message-mode-hook
>                 texinfo-mode-hook
> 		c-mode-common-hook
> 		python-mode-hook))
>   (add-hook hook
> 	    '(lambda () (highlight-80+-mode))))
> 
> One minor point, is I really want this to apply to *all* modes, not
> just the ones I thought to list here. Is there any global mode hook
> that applies to everything? The only files I would ever edit with
> emacs would have the 80 line rule apply to them i.e. I don't do word
> processing in emacs.

Some minor modes can be turned on by setting the mode variable (whereas
some can only be turned on by calling the mode function).  So you could
try setting the highlight-80+ mode variable globally, with setq-default.

-- 
Kevin Rodgers
Denver, Colorado, USA