[sanniolug] Re: emacs e canc

  • From: Massimiliano Mirra <list2@xxxxxxxxxxxxxxxxx>
  • To: sanniolug@xxxxxxxxxxxxx
  • Date: Fri, 21 May 2004 21:16:31 +0200

Bartolomeo Ravera <barrav@xxxxxxxxx> writes:

> Se qualcuno mi svelasse il modo per cancellare il testo evidenziato con
> "canc" invece che con "C-w", mi eviterebbe una nevrosi!

Prova con questo:

(defun kill-region-if-it-exists-else-delete-char ()
  (interactive)
  (let ((markp (condition-case nil 
                   (mark) 
                 (error nil))))
    (if markp 
        (kill-region (point) (mark)) 
      (delete-char 1))))

L'associazione della funzione a un tasto è lasciata come esercizio al
lettore. ;-)


-- 
Tip | Per rinominare dei file aggiungendo l'estensione .mbox:
of  | 
the | $ for i in *; do if (test -f $i) then mv $i $i.mbox; fi; done 
day | 
0007| 

Other related posts: