Re: Keybinding that loops through Major Modes

[Christopher Dimech]

Works very nicely.

Many thanks.


> Sent: Tuesday, November 03, 2020 at 12:29 AM
> From: "Emanuel Berg via Users list for the GNU Emacs text editor" 
> <help-gnu-emacs@gnu.org>
> To: help-gnu-emacs@gnu.org
> Subject: Re: Keybinding that loops through Major Modes
>
> > (defun iterate-major-mode ()
> >   (interactive)
> >   (let*((modes     (list #'emacs-lisp-mode #'perl-mode #'text-mode))
> >         (new-mode  (or (cadr (member major-mode modes)) (car modes))) )
> >     (apply `(,new-mode)) ))
> > ;; (iterate-major-mode)
>
> Maybe this looks better:
>
> (defun iterate-major-mode ()
>   (interactive)
>   (let*((modes    (list #'emacs-lisp-mode #'perl-mode #'text-mode))
>         (new-mode (or (cadr (member major-mode modes)) (car modes))) )
>     (apply (list new-mode))) )
> ;; (iterate-major-mode)
>
> --
> underground experts united
> http://user.it.uu.se/~embe8573
> https://dataswamp.org/~incal
>
>
>