Path: utzoo!utgpu!water!watmath!clyde!att!pacbell!ames!oliveb!intelca!mipos3!nate
From: nate@mipos3.intel.com (Nate Hess)
Newsgroups: comp.emacs
Subject: Re: Bug in center-region + Fix
Keywords: center-region
Message-ID: <2454@mipos3.intel.com>
Date: 26 Jun 88 19:12:18 GMT
References: <2433@mipos3.intel.com> <6938@trwrb.UUCP>
Reply-To: nate@mipos3.intel.com (Nate Hess)
Organization: Intel Corporation, Santa Clara, CA
Lines: 23

In article <6938@trwrb.UUCP> heins@trwrb.dsd.trw.com.UUCP (Michael T. Heins) writes:
>Well, Nate, thanks for the fix, but when I installed it in my 
>version 18.51, I got a message:
>  Symbol's function definition is void: count-indenting-ws-chars
>Could you post the missing definitions, please?  Thanks.

Whoops, sorry about that!  Here is the missing function:

(defun count-indenting-ws-chars ()
  "Count the number of white space characters starting the current line."
  (let (bol bot)
    (beginning-of-line)
    (setq bol (point))
    (back-to-indentation)
    (setq bot (point))
    (- bot bol))
) ;count-indenting-ws-chars

-- 
	   "How did you get your mind to tilt like your hat?"

...!{decwrl|hplabs!oliveb|pur-ee|qantel|amd}!intelca!mipos3!nate
 :   nate@mipos3.intel.com		ATT :    (408) 765-4309