[gambit-list] Emacs pinky...

Isaac Freeman memotype at gmail.com
Fri Sep 25 11:29:48 EDT 2009


As a long time user of vim, I gave emacs a good month trial and
quickly experienced the fatigue you spoke of, with little to no
improvement in my productivity. Vi has a bad rep when it comes to
editing lisp style code, but modern vi clones (especially vim) have
come a long way. Viper is nice, but it doesn't have all the features
of something like vim.

Anyways, I'm by no means trying to start an editor war, but I think a
close look at vim is at least worth it if you are suffering from
escape-meta-alt-control-shift fatigue. Some good links on editing lisp
and/or scheme can be found with google, but here are some anyways:

http://cybertiggyr.com/15-vim/

http://technotales.wordpress.com/2007/10/03/like-slime-for-vim/

http://www.vim.org/scripts/script.php?script_id=2219

Anyways, as you can see, coding scheme in vim doesn't have to be the
nightmare many people think it is.

On Fri, Sep 25, 2009 at 10:06 AM, David St-Hilaire
<sthilaid at iro.umontreal.ca> wrote:
> Hi all!
>
> I believe I've recently fallen victim to the infamous 'Emacs pinky'
> sickness (see http://en.wikipedia.org/wiki/Emacs#Emacs_Pinky)... :(
>
> I made several changes to my working environment in hope to remedy the
> situation, such as swaping ctl and alt. I also am trying to learn to
> press control keys with one hand and the other combo key with the
> other thus using both controls and alt keys. I'll go check today if I
> can find an ergonomic keyboard too.
>
> Does anyone have some other ideas/tips for improving the situation?
> Using vi is my last resort option as I am really familiar with emacs
> and love it alot...
>
> Thanks!
>
> David
>
> PS: I am pasting here the changes I made in hope they might get
> usefull to others that may want to avoid this problem...
>
> ~/.swapCtlAlt.xmodmap
> keycode 37 = Alt_L Meta_L
> keycode 64 = Control_L
> keycode 108 = Control_R
> keycode 105 = Alt_R Meta_R
> clear Control
> clear Mod1
> add Control = Control_L Control_R
> add Mod1 = Alt_L Alt_R
>
> ~/.bashrc
> xmodmap .swapCtlAlt.xmodmap
>
> ~/.emacs:
> (global-set-key (kbd "1") (lambda () (interactive) (insert ?!)))
> (global-set-key (kbd "2") (lambda () (interactive) (insert ?@)))
> (global-set-key (kbd "3") (lambda () (interactive) (insert ?#)))
> (global-set-key (kbd "4") (lambda () (interactive) (insert ?$)))
> (global-set-key (kbd "5") (lambda () (interactive) (insert ?%)))
> (global-set-key (kbd "6") (lambda () (interactive) (insert ?^)))
> (global-set-key (kbd "7") (lambda () (interactive) (insert ?&)))
> (global-set-key (kbd "8") (lambda () (interactive) (insert ?*)))
> (global-set-key (kbd "9") (lambda () (interactive) (insert ?\()))
> (global-set-key (kbd "0") (lambda () (interactive) (insert ?\))))
>
> (global-set-key (kbd "!") (lambda () (interactive) (insert ?1)))
> (global-set-key (kbd "@") (lambda () (interactive) (insert ?2)))
> (global-set-key (kbd "#") (lambda () (interactive) (insert ?3)))
> (global-set-key (kbd "$") (lambda () (interactive) (insert ?4)))
> (global-set-key (kbd "%") (lambda () (interactive) (insert ?5)))
> (global-set-key (kbd "^") (lambda () (interactive) (insert ?6)))
> (global-set-key (kbd "&") (lambda () (interactive) (insert ?7)))
> (global-set-key (kbd "*") (lambda () (interactive) (insert ?8)))
> (global-set-key [?\(] (lambda () (interactive) (insert ?9)))
> (global-set-key [?\)] (lambda () (interactive) (insert ?0)))
>
> ~/.../paredit.el
> (progn (setq paredit-commands
>  `(
>   "Basic Insertion Commands"
>   ("9"         paredit-open-round
>                ("(a b |c d)"
>                 "(a b (|) c d)")
>                ("(foo \"bar |baz\" quux)"
>                 "(foo \"bar (|baz\" quux)"))
>   ("0"         paredit-close-round
>                ("(a b |c   )" "(a b c)|")
>                ("; Hello,| world!"
>                 "; Hello,)| world!"))
>   ...
>   "Depth-Changing Commands"
>   ("M-9"       paredit-wrap-round
>                ("(foo |bar baz)"
>                 "(foo (|bar) baz)"))
>   ...
>   "Barfage & Slurpage"
>   (("C-0" "C-<right>")
>                paredit-forward-slurp-sexp
>                ("(foo (bar |baz) quux zot)"
>                 "(foo (bar |baz quux) zot)")
>                ("(a b ((c| d)) e f)"
>                 "(a b ((c| d) e) f)"))
>   ))
>       nil)
> _______________________________________________
> Gambit-list mailing list
> Gambit-list at iro.umontreal.ca
> https://webmail.iro.umontreal.ca/mailman/listinfo/gambit-list
>



-- 
Isaac Freeman
memotype (at) gmail.com

"The diversity of mankind is a basic postulate of our knowledge of
human beings. But if mankind is diverse and individuated, then how can
anyone propose equality as an ideal? Every year, scholars hold
Conferences on Equality and call for greater equality, and no one
challenges the basic tenet. But what justification can equality find
in the nature of man? If each individual is unique, how else can he be
made 'equal' to others than by destroying most of what is human in him
and reducing human society to the mindless uniformity of the ant
heap?" --Murray N. Rothbard



More information about the Gambit-list mailing list