Path: utzoo!attcan!utgpu!jarvis.csri.toronto.edu!cs.utexas.edu!wuarchive!zaphod.mps.ohio-state.edu!sunybcs!boulder!grunwald
From: grunwald@foobar.colorado.edu (Dirk Grunwald)
Newsgroups: comp.emacs
Subject: Re: customizing .emacs
Message-ID: <14713@boulder.Colorado.EDU>
Date: 8 Dec 89 20:36:59 GMT
References: <14407@eerie.acsu.Buffalo.EDU>
Sender: news@boulder.Colorado.EDU
Reply-To: grunwald@foobar.colorado.edu
Organization: University of Colorado at Boulder
Lines: 13
In-reply-to: kwon@sybil.cs.Buffalo.EDU's message of 8 Dec 89 18:11:11 GMT

>>>>> On 8 Dec 89 18:11:11 GMT, kwon@sybil.cs.Buffalo.EDU (Thomas Kwon) said:
Tom> I am trying to customize my .emacs file so that it can move some sections
Tom> of a file being edited to the left or right by specified number of
Tom> columns. For example, if I had the following text :

(defun move-by (by)
   (interactive "Nmove by? ")
   (save-excursion
      (narrow-to-region (point) (mark))
	(goto-char (point-min))
	(replace-regexp "^[\ 	]*" (concat "\\&" (make-string by 32)))
	(tabify (point-min) (point-max))
	(widen)))