Re: [Q] I want to get the column just under a point.

Article View: fj.editor.emacs

Article #365

#365

From: Katsuhiro Hermit Endo
Date: Thu, 28 Jan 1993 01:57

32 lines
1492 bytes

  Hermit $@$H?=$7$^$9!#(J

> $@$O$8$a$^$7$F!"?eLn!w;0I)EE5!(J($@3t(J) $@$H?=$7$^$9!#(J

  $@$3$s$K$A$O!#(J


> 	$@Nc$($P(J       x <- $@$3$3$N0LCV$KBP$9$k(J
> 		     y <- $@$3$N0LCV$rCN$j$?$$(J

  $@$3$s$J;v$G$7$g$&$+!)(J

(defun get-vertical-point (direction)
  "Returns vertical point, up for DIRECTION value of -1, down for -1."
  (let ((temporary-goal-column (current-column)))
    (save-excursion
      (forward-line direction)
      (move-to-column temporary-goal-column)
      ;; $@L\E*$N9T$,C;$$!#(J
      (if (< (current-column) temporary-goal-column) (error ""))
      (point))))


  $@$A$g$&$I;d$O!"(J(next-line) $@$H$+$r8+$F!"AR8KHV$r3HD%$7$F$$$?(J
$@$H$3$m$G$9!#$3$l$O!"$=$N0lIt$G$9!#(J

# $@4X?tL>$,JQ$G$4$a$s$J$5$$!#(J

--
                               $@1sF#(J Hermit $@>!9-(J     66$@!4(J
  $@$o$?$7(J $@$T$h$C$F$^$9$%!A(J     hermit@omnis.co.jp   ($@#v!w(J

Technical Details

Message-ID: <HERMIT.93Jan28105743@kaede.omnis.co.jp>

Path: arc1-ca.pugleaf.net!sparky!uunet!ccut!news.u-tokyo.ac.jp!wnoc-tyo-news!rena!omnis.co.jp!kaede!hermit

References: <MASAJI.93Jan25175445@sage.isl.melco.co.jp>

Show Full Headers

Complete Article Headers

Path: arc1-ca.pugleaf.net!sparky!uunet!ccut!news.u-tokyo.ac.jp!wnoc-tyo-news!rena!omnis.co.jp!kaede!hermit
From: hermit@omnis.co.jp (Katsuhiro Hermit Endo)
Newsgroups: fj.editor.emacs
Subject: Re: [Q] I want to get the column just under a point.
Message-ID: <HERMIT.93Jan28105743@kaede.omnis.co.jp>
Date: 28 Jan 93 01:57:43 GMT
References: <MASAJI.93Jan25175445@sage.isl.melco.co.jp>
Sender: hermit@omnis.co.jp
Distribution: fj
Organization: Omnis,inc., Tokyo, JAPAN
Lines: 32
In-reply-to: masaji@isl.melco.co.jp's message of 25 Jan 93 17:54:45 JST

Reply to Parent Message