Newsgroups: fj.editor.emacs
Path: galaxy.trc.rwcp.or.jp!jaist-news!cs.titech!nirvana.cs.titech!wnoc-tyo-news!news.u-tokyo.ac.jp!news.tisn.ad.jp!tkyux3!tkyux3!skimu
From: skimu@izanagi.phys.s.u-tokyo.ac.jp (Shigenobu Kimura)
Subject: Re: Q: M-x shell
In-Reply-To: inaki@miln.mei.co.jp's message of Tue, 10 May 1994 04: 48:08 GMT
Message-ID: <SKIMU.94May11144547@izanagi.phys.s.u-tokyo.ac.jp>
Lines: 41
Sender: news@tkyux.phys.s.u-tokyo.ac.jp (USENET News System)
Nntp-Posting-Host: izanagi
Organization: Department of Physics, Univ. of Tokyo, Japan.
References: <SANO.94May9155410@antares.cis.fpu.ac.jp>
	<INAKI.94May10134808@sun39.miln.mei.co.jp>
Distribution: fj
Date: Wed, 11 May 1994 05:45:47 GMT
Lines: 41
Xref: galaxy.trc.rwcp.or.jp fj.editor.emacs:4678
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.editor.emacs&nb=4678&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.

In article <INAKI.94May10134808@sun39.miln.mei.co.jp> inaki@miln.mei.co.jp ( Takaaki Inaki) writes:

    $B:4Ln$5$s(B> $B!!(Bemacs $B$N%7%'%k%b!<%I$G(B man $B%3%^%s%I$J$I$r;H$&$H!"(B
    $B:4Ln$5$s(B> $B!!2<@~$J$I$N%3%s%H%m!<%k%3!<%I$,I=<($5$l$F$7$^$$$^$9$,!"(B
    $B:4Ln$5$s(B> $B!!$3$l$rD>$94JC1$JJ}K!$O$"$k$N$G$7$g$&$+!)(B

   emacs $B$J$i(B M-x manual-entry $B$NJ}$,NI$$$N$G$O(B? (^^; $B$H$$$&OC$OCV$$$H$$$F!"(B
   SunOS $B$J$i(B 'col' $B$H$$$&%U%#%k%?$,$"$kH&$J$N$G!"(B

   % alias man 'man \!* | col -b | $PAGER'

   $B$J$I$H$7$F$*$1$PNI$$$N$G$O$J$$$G$7$g$&$+!#(B

$B$o$?$7$O!"(Bgnuserv$B$r$D$+$C$F!"(B.bashrc$B$K$3$s$J$N$r$+$$$F$$$^$9!#(B
csh$B$G$b;w$?$h$&$J$3$H$,=PMh$k$N$G$O$J$$$G$7$g$&$+!)(B
$B$$$+$,$G$9$+!)(B
  #
  # Emacs shell mode
  #
  if [ $TERM = 'emacs' ]; then
    PAGER=cat
    EDITOR=/usr/local/mule/etc/gnuclient
    man()
    {
      case $# in
        1) /usr/local/mule/etc/gnudoit -q "(manual-entry \"$1\")"
        ;;
        2) if [ $1 = '-k' ]; then
               /usr/ucb/man $1 $2
           else # assume man sec entry
        /usr/local/mule/etc/gnudoit -q "(manual-entry \"$2\" \"$1\")"
           fi
;;
        *)  echo "man [sec] entry"
        ;;
      esac
    }
  fi   # Emacs shell mode
--
$B$-$`$i(B

