Email "cut here" code snippets

Email "cut here" code snippets

[Tory S. Anderson]

I use GNUs and notice that some people include "---8<-- cut here" type snippets, which are specially formatted in my view. Where can I find this behavior documented, and is there a predefined shortcut for inserting these? I haven't spotted anything on it in the GNUs manual or online searches. 

Re: Email "cut here" code snippets

[Rainer M Krug]

[-- Attachment #1: Type: text/plain, Size: 952 bytes --]

torys.anderson@gmail.com (Tory S. Anderson) writes:

> I use GNUs and notice that some people include "---8<-- cut here" type
> snippets, which are specially formatted in my view. Where can I find
> this behavior documented, and is there a predefined shortcut for
> inserting these? I haven't spotted anything on it in the GNUs manual
> or online searches.

It is in message.el:

,----
| message-mark-inserted-region is an interactive compiled Lisp function
| in `message.el'.
| 
| It is bound to C-c m.
| 
| (message-mark-inserted-region BEG END &optional VERBATIM)
| 
| Mark some region in the current article with enclosing tags.
| See `message-mark-insert-begin' and `message-mark-insert-end'.
| If VERBATIM, use slrn style verbatim marks ("#v+" and "#v-").
`----

I think I defined the keyboard shortcut myself.

Hope this helps,

Rainer


>
>

-- 
Rainer M. Krug
email: Rainer<at>krugs<dot>de
PGP: 0x0F52F982

[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 494 bytes --]

Re: Email "cut here" code snippets

[Sebastien Vauban]

Rainer M Krug wrote:
> torys.anderson-Re5JQEeQqe8AvxtiuMwx3w@public.gmane.org (Tory S. Anderson) writes:
>
>> I use GNUs and notice that some people include "---8<-- cut here" type
>> snippets, which are specially formatted in my view. Where can I find
>> this behavior documented, and is there a predefined shortcut for
>> inserting these? I haven't spotted anything on it in the GNUs manual
>> or online searches.
>
> It is in message.el:
>
> ,----
> | message-mark-inserted-region is an interactive compiled Lisp function
> | in `message.el'.
> | 
> | It is bound to C-c m.
> `----
>
> I think I defined the keyboard shortcut myself.

C-c M-m is the default one.

Best regards,
  Seb

-- 
Sebastien Vauban

Re: Email "cut here" code snippets

[Glyn Millington]

torys.anderson@gmail.com (Tory S. Anderson) writes:

> I use GNUs and notice that some people include "---8<-- cut here" type
> snippets, which are specially formatted in my view. Where can I find
> this behavior documented, and is there a predefined shortcut for
> inserting these? I haven't spotted anything on it in the GNUs manual or
> online searches.

I have had this in my init.el/.emacs for ever!  It's not mine and I can't
remember where it came from but it works



;;;; SCISSORS
(defvar scissors "8<------"
  "string to insert in \\[scissors]")

(defun scissors ()
  "Insert a line of SCISSORS in the buffer"
  (interactive)
  (or (bolp) (beginning-of-line 2))
  (while (<= (current-column) (- (or fill-column 70) (length scissors)))
    (insert scissors))
  (newline))

(bind-key "s-s" 'scissors)


hth


Glyn

Re: Email "cut here" code snippets

[Grant Rettke]

Me, too.

(defun gcr/chs ()
  "Insert opening \"cut here start\" snippet."
  (interactive)
  (insert "--8<---------------cut here---------------start------------->8---"))

(defun gcr/che ()
  "Insert closing \"cut here end\" snippet."
  (interactive)
  (insert "--8<---------------cut here---------------end--------------->8---"))

One more person confesses and one of us will turn it into a package.

On Thu, Jan 29, 2015 at 7:30 AM, Glyn Millington
<glyn.millington@gmail.com> wrote:
> torys.anderson@gmail.com (Tory S. Anderson) writes:
>
>> I use GNUs and notice that some people include "---8<-- cut here" type
>> snippets, which are specially formatted in my view. Where can I find
>> this behavior documented, and is there a predefined shortcut for
>> inserting these? I haven't spotted anything on it in the GNUs manual or
>> online searches.
>
> I have had this in my init.el/.emacs for ever!  It's not mine and I can't
> remember where it came from but it works
>
>
>
> ;;;; SCISSORS
> (defvar scissors "8<------"
>   "string to insert in \\[scissors]")
>
> (defun scissors ()
>   "Insert a line of SCISSORS in the buffer"
>   (interactive)
>   (or (bolp) (beginning-of-line 2))
>   (while (<= (current-column) (- (or fill-column 70) (length scissors)))
>     (insert scissors))
>   (newline))
>
> (bind-key "s-s" 'scissors)
>
>
> hth
>
>
> Glyn
>
>



-- 
Grant Rettke
gcr@wisdomandwonder.com | http://www.wisdomandwonder.com/
“Wisdom begins in wonder.” --Socrates
((λ (x) (x x)) (λ (x) (x x)))
“Life has become immeasurably better since I have been forced to stop
taking it seriously.” --Thompson

Re: Email "cut here" code snippets

[Marcin Borkowski]

On 2015-01-29, at 13:06, Tory S. Anderson <torys.anderson@gmail.com> wrote:

> I use GNUs and notice that some people include "---8<-- cut here" type snippets, which are specially formatted in my view. Where can I find this behavior documented, and is there a predefined shortcut for inserting these? I haven't spotted anything on it in the GNUs manual or online searches. 

Did you try C-c M-m in message mode (message-mark-inserted-region)?

Hth,

-- 
Marcin Borkowski
http://octd.wmi.amu.edu.pl/en/Marcin_Borkowski
Faculty of Mathematics and Computer Science
Adam Mickiewicz University