home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #3 / NN_1993_3.iso / spool / fj / editor / emacs / 1409 < prev    next >
Encoding:
Internet Message Format  |  1993-01-27  |  1.3 KB

  1. Path: sparky!uunet!ccut!news.u-tokyo.ac.jp!wnoc-tyo-news!sh.wide!fgw!fdm!csnews!virgo!p2077
  2. From: p2077@ai.cs.fujitsu.co.jp (Michiaki KATAOKA)
  3. Newsgroups: fj.editor.emacs
  4. Subject: Re: [Q] I want to get the column just under a point.
  5. Message-ID: <P2077.93Jan27093908@Pegasus.ai.cs.fujitsu.co.jp>
  6. Date: 27 Jan 93 00:39:08 GMT
  7. References: <MASAJI.93Jan25175445@sage.isl.melco.co.jp>
  8. Sender: news@ai.cs.fujitsu.co.jp
  9. Distribution: fj
  10. Organization: Global Development Department, 2nd PP Division, Fujitsu
  11. Lines: 24
  12. In-reply-to: masaji@isl.melco.co.jp's message of 25 Jan 93 08:54:45 GMT
  13.  
  14.  
  15. In article <MASAJI.93Jan25175445@sage.isl.melco.co.jp> masaji@isl.melco.co.jp (Masaji Mizuno) writes:
  16.  >      $@!)%+%i%`(J $@!a(J (screen-width - 1)$@%+%i%`(J $@$N;~(J
  17.  >$@$H(J
  18.  >      $@!)%+%i%`(J $@!a(J (screen-width - 2)$@%+%i%`(J $@$N;~(J
  19. ($@N,(J)
  20.  > $@>e5-$N$I$N%Q%?!<%s$G$"$k$+$rFCDj$9$k(J$@$3$H(J
  21.  
  22.  
  23. (- (save-excursion (vertical-motion 1) (point))
  24.    (save-excursion (vertical-motion 0) (point)))
  25.  
  26. $@$G(J, $@2hLL$NI=<(>e$N0l9T$ND9$5$O$o$+$j$=$&$G$9$M(J. 
  27.  
  28. $@$D$$$G$K(J, $@8=:_$N%]%$%s%H$NI=<(>e$N%3%i%`0LCV$O(J,
  29.  
  30. (- (current-column)
  31.    (progn (vertical-motion 0) (current-column)))
  32.  
  33. $@$GJ,$+$k$H;W$$$^$9(J.
  34.  
  35. ;;; $@$$$m(J$@$$$m(J $@$d$jJ}$O$"$j$=$&$J5$$,$7$F$-$^$7$?(J.
  36.  
  37. $@$*$o$j(J.
  38.