[gambit-list] Emacs pinky...

Pavel Dudrenov dudrenov at gmail.com
Fri Sep 25 11:32:51 EDT 2009


heresy!!!

I'm joking. VI is a useful tool too.


On Fri, Sep 25, 2009 at 8:29 AM, Isaac Freeman <memotype at gmail.com> wrote:
> 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
> _______________________________________________
> Gambit-list mailing list
> Gambit-list at iro.umontreal.ca
> https://webmail.iro.umontreal.ca/mailman/listinfo/gambit-list
>



More information about the Gambit-list mailing list