doc/tl-jp.texi

   1 \input texinfo.tex
   2 @c{-*-tl manual-*-}
   3 @setfilename tl-jp.info
   4 @settitle{tl manual}
   5
   6 @titlepage
   7 @sp{5}
   8 @center{@titlefont{Emacs Lisp library `tl'}}
   9 @sp{15}
  10 @center{@titlefont{\e$B<i2,\e(B \e$BCNI'\e(B}}
  11 @sp{1}
  12 @center{$Id: tl-jp.texi,v 1.2 1994/11/08 19:07:28 morioka Exp $}
  13
  14 @end titlepage
  15
  16 @node Top, Abstract, (dir), (dir)
  17 @comment  node-name,  next,  previous,  up
  18
  19 @ifinfo
  20 tm \e$B$J$I$G;H$o$l$k\e(B Emacs Lisp \e$B$N\e(B library, `tl' \e$B$K4X$7$F@bL@$7$^$9!#\e(B
  21 @end ifinfo
  22
  23 @menu
  24 * Abstract::
  25 * Compatible::
  26 * tl-list::
  27 * tl-str::
  28 * tl-header::
  29 * Concept Index::
  30 * Command Index::
  31 * Variable Index::
  32 @end menu
  33
  34
  35 @node Abstract, Compatible, Top, Top
  36 @comment  node-name,  next,  previous,  up
  37 @chapter{\e$B35MW\e(B}
  38 @cindex{\e$B35MW\e(B}
  39
  40 tl \e$B$O\e(B tm \e$B$J$I$N\e(B Emacs Lisp program \e$B$G6&DL$K;H$&$?$a$NHFMQE*$J\e(B module
  41 \e$B$r=8$a$?\e(B package \e$B$G$9!#\e(B
  42
  43 tl \e$B$O0J2<$N$h$&$J\e(B module \e$B$+$i@.$j$^$9!#\e(B
  44
  45 @itemize @bullet
  46 @item tl-18
  47 @item tl-nemacs
  48 @item tl-orig
  49 @item tl-mule
  50 @item tl-list
  51 @item tl-str
  52 @item tl-header
  53 @end itemize
  54
  55
  56 @node Compatible, tl-18, Abstract, Top
  57 @comment  node-name,  next,  previous,  up
  58 @chapter{\e$B8_49@-$r$H$k$?$a$N5!9=\e(B}
  59 @cindex{\e$B8_49@-$r$H$k$?$a$N5!9=\e(B}
  60
  61 tl \e$B$G$O!"\e(BOriginal Emacs \e$B$G$N\e(B version \e$B$N:9$d!"$=$NF|K\8l2=$dB?8@8l2=$J\e(B
  62 \e$B$I$N3HD%$K$h$k:9$rKd$a!"$3$l$i$NB?MM$J\e(B Emacs \e$B$N>e$G8_49@-$r$H$k$?$a$N\e(B
  63 \e$B5!9=$rMQ0U$7$F$$$^$9!#\e(B
  64
  65 \e$B$=$N0l$D$O!"\e(BEmacs 18 \e$B$G\e(B Emacs 19 \e$B$N4X?t$rMQ0U$7$F!"\e(BEmacs 19 \e$B$G3HD%$5$l\e(B
  66 \e$B$?5!G=$r\e(B Emacs 18 \e$B$GMxMQ$9$k$?$a$N\e(B module `tl-18' \e$B$G$9!#\e(B
  67
  68 \e$B$b$&0l$D$O!"\e(BNEmacs, Original Emacs, Mule \e$B$J$I$G$NJ8;z!"J8;zNs$N<h07$$\e(B
  69 \e$B$N:90[$rKd$a!"$3$l$i$G6&DL$KF0$/\e(B program \e$B$r=q$/$?$a$N\e(B module \e$B$G$9!#\e(B
  70
  71
  72 @menu
  73 * tl-18::
  74 * tl-nemacs::
  75 * tl-orig::
  76 * tl-mule::
  77 @end menu
  78
  79
  80 @node tl-18, tl-nemacs, Compatible, Compatible
  81 @comment  node-name,  next,  previous,  up
  82 @section{tl-18}
  83 @cindex{tl-18}
  84
  85 tl-18 \e$B$O\e(B Emacs 18 \e$B$G\e(B Emacs 19 \e$B$N4X?t$r;H$&$?$a$N\e(B module \e$B$G$9!#\e(B
  86
  87 tl-18.el \e$B$G$O!"8=:_!"\e(BEmacs 19 \e$B$N4X?t$N$&$A!"\e(B@code{add-hook},
  88 @code{member} \e$B$r<B8=$7$F$$$^$9!#\e(B
  89
  90 tl-18 \e$B$rMxMQ$9$k$K$O\e(B @code{(require 'tl-18)} \e$B$r=q$$$F2<$5$$!#\e(B
  91
  92
  93 @node tl-nemacs, tl-orig, tl-18, Compatible
  94 @comment  node-name,  next,  previous,  up
  95 @section{tl-nemacs}
  96 @cindex{tl-nemacs}
  97
  98 tl-nemacs \e$B$O!"\e(BNEmacs \e$B$K$*$$$F!"<g$K!"F|K\8l=hM}$K4X$7$F!"\e(BMule \e$B$J$I$NB>\e(B
  99 \e$B$N\e(B Emacs \e$B$H$N8_49@-$r<h$k$?$a$N\e(B module \e$B$G$9!#\e(Btl-nemacs \e$B$r;H$&$3$H$K$h$C\e(B
 100 \e$B$F!"\e(BNEmacs, Original Emacs, Mule \e$B$NJL$K0M$i$J$$\e(B program \e$B$r=q$/$3$H$,$G\e(B
 101 \e$B$-$^$9!#\e(B
 102
 103 tl-nemacs \e$B$rMxMQ$9$k$K$O\e(B @code{(require 'tl-nemacs)} \e$B$r=q$$$F2<$5$$!#\e(B
 104
 105
 106 @subsection{\e$BJ8;z\e(B code}
 107
 108 @defvr{Constant} *junet*
 109
 110 ISO-2022-JP (JIS) \e$B$rI=$9!#CM$O\e(B 2.\e$B!J\e(BMULE \e$B8_49Dj?t!K\e(B
 111 @end defvr
 112
 113 @defvr{Constant} *internal*
 114
 115 NEmacs \e$B$NFbIt\e(B code \e$B$rI=$9!#CM$O\e(B 3. \e$B<B:]$K$O!"\e(BEUC \e$B$HF1$8!#!J\e(BMULE \e$B8_49Dj\e(B
 116 \e$B?t!K\e(B
 117 @end defvr
 118
 119 @defvr{Constant} *euc-japan*
 120
 121 EUC-JP (EUC) \e$B$rI=$9!#CM$O\e(B 3.\e$B!J\e(BMULE \e$B8_49Dj?t!K\e(B
 122 @end defvr
 123
 124 @deffn{Function} code-convert-string STR SOURCE TARGET
 125
 126 \e$BJ8;zNs\e(B @var{STR} \e$B$r\e(B @var{SOURCE} code \e$B$+$i\e(B @var{TARGET} code \e$B$KJQ49$9\e(B
 127 \e$B$k!#!J\e(BMULE \e$B8_494X?t!K\e(B
 128 @end deffn
 129
 130
 131 @subsection{leading character}
 132
 133 @defvr{Constant} lc-ascii
 134
 135 ASCII \e$B$rI=$9\e(B leading character.\e$B!J\e(BMULE \e$B8_49Dj?t!K\e(B
 136 @end defvr
 137
 138 @defvr{Constant} lc-jp
 139
 140 JIS X0208 \e$B$rI=$9\e(B leading character.\e$B!J\e(BMULE \e$B8_49Dj?t!K\e(B
 141 @end defvr
 142
 143 @deffn{Function} get-lc CHR
 144
 145 \e$BJ8;z$N@hF,\e(B octet @var{CHR} \e$B$KBP$7$F!"$=$NJ8;z$N\e(B leading character \e$B$rJV\e(B
 146 \e$B$9!#\e(B
 147 @end deffn
 148
 149
 150 @subsection{\e$BJ8;z=hM}\e(B}
 151
 152 @deffn{Function} char-bytes CHR
 153
 154 \e$BJ8;z$N@hF,\e(B octet @var{CHR} \e$B$KBP$7$F!"$=$NJ8;z$N\e(B byte \e$B?t$rJV$9!#!J\e(BMULE
 155 \e$B8_494X?t!K\e(B
 156 @end deffn
 157
 158 @deffn{Function} char-width CHR
 159
 160 \e$BJ8;z$N@hF,\e(B octet @var{CHR} \e$B$KBP$7$F!"$=$NJ8;z$NI}$rJV$9!#!J\e(BMULE \e$B8_494X\e(B
 161 \e$B?t!K\e(B
 162 @end deffn
 163
 164
 165 @subsection{\e$BJ8;zNs=hM}\e(B}
 166
 167 @deffn{Function} string-width STR
 168
 169 \e$BJ8;zNs\e(B @var{STR} \e$B$NI}$rJV$9!#!J\e(BMULE \e$B8_494X?t!K\e(B
 170 @end deffn
 171
 172 @deffn{Function} check-ASCII-string STR
 173
 174 \e$BJ8;zNs\e(B @var{STR} \e$B$NCf$K\e(B ASCII \e$B0J30$NJ8;z$,4^$^$l$J$$$3$H$r3N$+$a$k!#$b\e(B
 175 \e$B$7!"\e(BASCII \e$B0J30$NJ8;z$,4^$^$l$F$$$l$P\e(B nil \e$B$rJV$9!#\e(B
 176 @end deffn
 177
 178
 179 @subsection{\e$B$=$NB>\e(B}
 180
 181 @deffn{Function} attribute-add-narrow-attribute ATR FROM TO
 182
 183 @var{FROM} \e$B$H\e(B @var{TO} \e$B$G0O$^$l$?\e(B region \e$B$K\e(B @var{ATR} \e$B$N\e(B attribute \e$B$r\e(B
 184 \e$BIU$1$k!#\e(B
 185 @end deffn
 186
 187
 188 @node tl-orig, tl-mule, tl-nemacs, Compatible
 189 @comment  node-name,  next,  previous,  up
 190 @section{tl-orig}
 191 @cindex{tl-orig}
 192
 193 tl-orig \e$B$O!"\e(BOriginal Emacs 19 \e$B$K$*$$$F!"<g$K!"\e(BISO-8859-1 \e$B$N=hM}$K4X$7\e(B
 194 \e$B$F!"\e(BMule \e$B$J$I$NB>$N\e(B Emacs \e$B$H$N8_49@-$r<h$k$?$a$N\e(B module \e$B$G$9!#\e(Btl-orig
 195 \e$B$r;H$&$3$H$K$h$C$F!"\e(BNEmacs, Original Emacs, Mule \e$B$NJL$K0M$i$J$$\e(B
 196 program \e$B$r=q$/$3$H$,$G$-$^$9!#\e(B
 197
 198 tl-orig \e$B$rMxMQ$9$k$K$O\e(B @code{(require 'tl-orig)} \e$B$r=q$$$F2<$5$$!#\e(B
 199
 200
 201 @subsection{leading character}
 202
 203 @defvr{Constant} lc-ascii
 204
 205 ASCII \e$B$rI=$9\e(B leading character.\e$B!J\e(BMULE \e$B8_49Dj?t!K\e(B
 206 @end defvr
 207
 208 @defvr{Constant} lc-ltn1
 209
 210 ISO 8859-1 \e$B$rI=$9\e(B leading character.\e$B!J\e(BMULE \e$B8_49Dj?t!K\e(B
 211 @end defvr
 212
 213 @deffn{Function} get-lc CHR
 214
 215 \e$BJ8;z$N@hF,\e(B octet @var{CHR} \e$B$KBP$7$F!"$=$NJ8;z$N\e(B leading character \e$B$rJV\e(B
 216 \e$B$9!#\e(B
 217 @end deffn
 218
 219
 220 @subsection{\e$BJ8;z=hM}\e(B}
 221
 222 @deffn{Function} char-bytes CHR
 223
 224 \e$BJ8;z$N@hF,\e(B octet @var{CHR} \e$B$KBP$7$F!"$=$NJ8;z$N\e(B byte \e$B?t$rJV$9!#!J\e(BMULE
 225 \e$B8_494X?t!K\e(B
 226 @end deffn
 227
 228 @deffn{Function} char-width CHR
 229
 230 \e$BJ8;z$N@hF,\e(B octet @var{CHR} \e$B$KBP$7$F!"$=$NJ8;z$NI}$rJV$9!#!J\e(BMULE \e$B8_494X\e(B
 231 \e$B?t!K\e(B
 232 @end deffn
 233
 234
 235 @subsection{\e$BJ8;zNs=hM}\e(B}
 236
 237 @deffn{Function} string-width STR
 238
 239 \e$BJ8;zNs\e(B @var{STR} \e$B$NI}$rJV$9!#!J\e(BMULE \e$B8_494X?t!K\e(B
 240 @end deffn
 241
 242
 243 @node tl-mule, tl-list, tl-orig, Compatible
 244 @comment  node-name,  next,  previous,  up
 245 @section{tl-mule}
 246 @cindex{tl-mule}
 247
 248 tl-mule \e$B$O!"\e(BMule \e$B$K$*$$$F!"<g$K!"B?8@8lJ8;zNs$N=hM}$K4X$7$F!"\e(BNEmacs \e$B$d\e(B
 249 Original Emacs \e$B$J$I$NB>$N\e(B Emacs \e$B$H$N8_49@-$r<h$k$?$a$N\e(B module \e$B$G$9!#\e(B
 250 tl-mule \e$B$r;H$&$3$H$K$h$C$F!"\e(BNEmacs, Original Emacs, Mule \e$B$NJL$K0M$i$J\e(B
 251 \e$B$$\e(B program \e$B$r=q$/$3$H$,$G$-$^$9!#\e(B
 252
 253 tl-mule \e$B$rMxMQ$9$k$K$O\e(B @code{(require 'tl-mule)} \e$B$r=q$$$F2<$5$$!#\e(B
 254
 255
 256 @subsection{leading character}
 257
 258 @deffn{Function} get-lc CHR
 259
 260 \e$BJ8;z$N@hF,\e(B octet @var{CHR} \e$B$KBP$7$F!"$=$NJ8;z$N\e(B leading character \e$B$rJV\e(B
 261 \e$B$9!#\e(B
 262 @end deffn
 263
 264
 265 @node tl-list, tl-str, Compatible, Top
 266 @comment  node-name,  next,  previous,  up
 267 @chapter{tl-list}
 268 @cindex{tl-list}
 269
 270 tl-list \e$B$O\e(B list \e$B=hM}$K4X$9$kM-MQ$J4X?t$r=8$a$?\e(B module \e$B$G$9!#\e(B
 271
 272 tl-list \e$B$rMxMQ$9$k$K$O\e(B @code{(require 'tl-list)} \e$B$r=q$$$F2<$5$$!#\e(B
 273
 274 @section{list}
 275
 276 @deffn{Function} last LIST
 277
 278 @var{LIST} \e$B$N:G8e$NMWAG$rJV$9!#!J\e(BCommon Lisp \e$B8_494X?t!K\e(B
 279 @end deffn
 280
 281 @deffn{Function} butlast LIST &optional n
 282
 283 @var{LIST} \e$B$N:G8e$N\e(B @var{n} \e$BMWAG$r=|$$$?\e(B copy \e$B$rJV$9!#!J\e(BCommon Lisp \e$B8_\e(B
 284 \e$B494X?t!K\e(B
 285 @end deffn
 286
 287 @deffn{Function} nbutlast LIST &optional n
 288
 289 @var{LIST} \e$B$N:G8e$N\e(B @var{n} \e$BMWAG$r=|$$$?$b$N$rJV$9!#!JGK2uE*!K!J\e(BCommon
 290 Lisp \e$B8_494X?t!K\e(B
 291 @end deffn
 292
 293
 294 @section{\e$BO"A[%j%9%H\e(B}
 295
 296 @deffn{Function} put-alist ITEM VALUE ALIST
 297
 298 \e$BO"A[%j%9%H\e(B @var{ALIST} \e$B$N\e(B key @var{ITEM} \e$B$KBP1~$9$kCM$r\e(B @var{VALUE} \e$B$K\e(B
 299 \e$B$9$k!#!JGK2uE*!K!J\e(BELIS \e$B8_494X?t!K\e(B
 300 @end deffn
 301
 302 @deffn{Function} del-alist ITEM ALIST
 303
 304 \e$BO"A[%j%9%H\e(B @var{ALIST} \e$B$N\e(B key @var{ITEM} \e$B$KBP1~$9$kCM$r:o=|$9$k!#!JGK\e(B
 305 \e$B2uE*!K!J\e(BELIS \e$B8_494X?t!K\e(B
 306 @end deffn
 307
 308 @deffn{Function} set-alist SYM ITEM VALUE
 309
 310 \e$BO"A[%j%9%H$rF~$l$?\e(B symbol @var{SYM} \e$B$N\e(B key @var{ITEM} \e$B$NCM$r\e(B
 311 @var{VALUE} \e$B$K$9$k!#!JGK2uE*!K\e(B
 312 @end deffn
 313
 314
 315 @section{\e$BC10l2=;R\e(B}
 316
 317 field \e$B$H$O\e(B @code{(field-type . field-value)} \e$B$H$$$&7A$r$7$?BP$G$"$k!#\e(B
 318 \e$B$3$N\e(B field \e$B$rMWAG$H$7$?\e(B @code{(field1 field2 ...)} \e$B$H$$$&7A$NO"A[%j%9\e(B
 319 \e$B%H$r!V7?!W$H$7$F<h$j07$&!#\e(B
 320
 321
 322 @deffn{Function} fetch-field KEY ALIST
 323
 324 \e$BO"A[%j%9%H\e(B @var{ALIST} \e$B$N\e(B key @var{KEY} \e$B$KBP1~$9$kBP$rJV$9!#\e(Bassoc \e$B$HF1\e(B
 325 \e$B$8!#!J\e(Bjinn \e$B8_494X?t!K\e(B
 326 @end deffn
 327
 328 @deffn{Function} put-field KEY VALUE ALIST
 329
 330 \e$BO"A[%j%9%H\e(B @var{ALIST} \e$B$N\e(B key @var{KEY} \e$B$KBP1~$9$kCM$r\e(B @var{VALUE} \e$B$K\e(B
 331 \e$B$9$k!#\e(Bput-field \e$B$HF1$8!#!JGK2uE*!K!J\e(Bjinn \e$B8_494X?t!K\e(B
 332 @end deffn
 333
 334 @deffn{Function} delete-field KEY VALUE
 335
 336 \e$BO"A[%j%9%H\e(B @var{ALIST} \e$B$N\e(B key @var{KEY} \e$B$KBP1~$9$kCM$r:o=|$9$k!#!JGK2u\e(B
 337 \e$BE*!K!J\e(Bjinn \e$B8_494X?t!K\e(B
 338 @end deffn
 339
 340
 341 @deffn{Function} field-unifier-for-default CLASS INSTANCE
 342
 343 \e$BB>$KE,Ev$J\e(B field-unifier \e$B$,8+$D$+$i$J$+$C$?>l9g$K5/F0$5$l$k\e(B
 344 field-unifier. field @var{CLASS} \e$B$H\e(B field @var{INSTANCE} \e$B$N\e(B
 345 field-unify \e$B$r9T$&!#!J\e(Bjinn \e$B8_494X?t!K\e(B
 346 @end deffn
 347
 348
 349 @deffn{Function} field-unify CLASS INSTANCE
 350
 351 field @var{CLASS} \e$B$H\e(B field @var{INSTANCE} \e$B$N\e(B field-unify \e$B$r9T$&!#<B:]\e(B
 352 \e$B$K$O!"\e(B@var{CLASS} \e$B$N\e(B field-type \e$B$KBP1~$7$?\e(B field-unifier \e$B$,5/F0$5$l$k!#\e(B
 353 \e$B!J\e(Bjinn \e$B8_494X?t!K\e(B
 354 @end deffn
 355
 356
 357 @deffn{Function} assoc-unify CLASS INSTANCE
 358
 359 \e$BO"A[%j%9%H\e(B @var{CLASS} \e$B$HO"A[%j%9%H\e(B @var{INSTANCE} \e$B$N\e(B type-unify \e$B$r9T\e(B
 360 \e$B$&!#!J\e(Bjinn \e$B8_494X?t!K\e(B
 361 @end deffn
 362
 363
 364 @node tl-str, tl-header, tl-list, Top
 365 @comment  node-name,  next,  previous,  up
 366 @chapter{tl-str}
 367 @cindex{tl-str}
 368
 369 tl-str \e$B$OJ8;zNs=hM}$K4X$9$kM-MQ$J4X?t$r=8$a$?\e(B module \e$B$G$9!#\e(B
 370
 371 tl-str \e$B$rMxMQ$9$k$K$O\e(B @code{(require 'tl-str)} \e$B$r=q$$$F2<$5$$!#\e(B
 372
 373
 374 @deffn{Function} rightful-boundary-short-string STR WIDTH
 375
 376 \e$BJ8;zNs\e(B @var{str} \e$B$r@hF,$+$iI}\e(B @var{WIDTH} \e$B0JFb$G@Z$C$?J8;zNs$rJV$7$^$9!#\e(B
 377 multi octet \e$BJ8;zNs$N>l9g$G$b@5$7$/J8;zC10L$G@ZCG$7$^$9!#\e(B
 378 @end deffn
 379
 380
 381 @deffn{Function} get-version-string ID
 382
 383 RCS \e$B$N\e(B version \e$BJ8;zNs\e(B @var{ID} \e$B$+$i?t;z$H\e(B `.' \e$B$+$i$N$_9=@.$5$l$k\e(B
 384 version number \e$BJ8;zNs$rJV$9!#\e(B
 385 @end deffn
 386
 387
 388 @deffn{Function} replace-as-filename STR
 389
 390 \e$BJ8;zNs\e(B @var{STR} \e$B$N$+$i\e(B file name \e$B$H$7$FLdBj$N$"$kJ8;z$r<h$j=|$$$?\e(B
 391 file name \e$B$H$7$F;H$($kJ8;zNs$rJV$9!#\e(B
 392 @end deffn
 393
 394
 395 @defvr{Variable} cited-prefix-regexp
 396
 397 \e$BL?Na\e(B @code{fill-cited-region} \e$B$GMQ$$$k!"0zMQJ8;zNs$N@hF,J8;zNs$rI=$9\e(B
 398 prefix. \e$B@55,I=8=$r;XDj$9$k!#\e(B
 399 @end defvr
 400
 401 @deffn{Command} fill-cited-region BEGIN END
 402
 403 \e$B@hF,0LCV\e(B @var{BEGIN} \e$B$H=*N;0LCV\e(B @var{END} \e$B$G0O$^$l$?\e(B region \e$B$r0zMQJ8;z\e(B
 404 \e$BNs$H$7$F\e(B fill \e$B$9$k!#\e(B
 405 @end deffn
 406
 407
 408 @deffn{Function} symbol-concat A B
 409
 410 \e$BJ8;zNs$+\e(B symbol \e$B$G$"$k#2$D$N0z?t\e(B @var{A} \e$B$H\e(B @var{B} \e$B$rJ8;zNs$H$7$F$D$J\e(B
 411 \e$B$$$@L>A0$N\e(B symbol \e$B$rJV$9!#!J\e(Bjinn \e$B8_494X?t!K\e(B
 412 @end deffn
 413
 414 @deffn{Function} top-string-match PAT STR
 415
 416 \e$BJ8;zNs\e(B @var{PAT} \e$B$,J8;zNs\e(B @var{STR} \e$B$N@hF,$K4^$^$l$k>l9g!"\e(B@code{(PAT
 417 \e$B;D$j\e(B)} \e$B$H$$$&7A<0$N\e(B list \e$B$rJV$9!#!J\e(Bjinn \e$B8_494X?t!K\e(B
 418 @end deffn
 419
 420 @deffn{Function} middle-string-match PAT STR
 421
 422 \e$BJ8;zNs\e(B @var{PAT} \e$B$,J8;zNs\e(B @var{STR} \e$B$N$I$3$+$K4^$^$l$k>l9g!"\e(B@code{(\e$BA0\e(B
 423 PAT \e$B;D$j\e(B)} \e$B$H$$$&7A<0$N\e(B list \e$B$rJV$9!#!J\e(Bjinn \e$B8_494X?t!K\e(B
 424 @end deffn
 425
 426
 427 @node tl-header, Concept Index, tl-str, Top
 428 @comment  node-name,  next,  previous,  up
 429 @chapter{tl-header}
 430 @cindex{tl-header}
 431
 432 tl-header \e$B$O\e(B mail \e$B$d\e(B News \e$B$J$I$N\e(B message header \e$B$N=hM}$K4X$9$kM-MQ$J4X\e(B
 433 \e$B?t$r=8$a$?\e(B module \e$B$G$9!#\e(B
 434
 435 tl-header \e$B$rMxMQ$9$k$K$O\e(B @code{(require 'tl-header)} \e$B$r=q$$$F2<$5$$!#\e(B
 436
 437
 438 @defvr{Constant} message/quoted-string-regexp
 439
 440 RFC 822 \e$B$K$*$1$k\e(B quoted-string \e$B$rI=$9@55,I=8=!#\e(B
 441 @end defvr
 442
 443 @defvr{Constant} message/field-name-regexp
 444
 445 RFC 822 \e$B$K$*$1$k\e(B field-name \e$B$rI=$9@55,I=8=!#\e(B
 446 @end defvr
 447
 448 @defvr{Constant} message/field-body-regexp
 449
 450 RFC 822 \e$B$K$*$1$k\e(B field-body \e$B$rI=$9@55,I=8=!#\e(B
 451 @end defvr
 452
 453 @defvr{Constant} message/field-regexp
 454
 455 RFC 822 \e$B$K$*$1$k\e(B field \e$B$rI=$9@55,I=8=!#\e(B
 456 @end defvr
 457
 458 @defvr{Constant} message/word-regexp
 459
 460 RFC 822 \e$B$K$*$1$k\e(B word \e$B$rI=$9@55,I=8=!#\e(B
 461 @end defvr
 462
 463 @defvr{Constant} message/local-part-regexp
 464
 465 RFC 822 \e$B$K$*$1$k\e(B local-part \e$B$rI=$9@55,I=8=!#\e(B
 466 @end defvr
 467
 468 @defvr{Constant} message/domain-regexp
 469
 470 RFC 822 \e$B$K$*$1$k\e(B domain \e$B$rI=$9@55,I=8=!#\e(B
 471 @end defvr
 472
 473 @defvr{Constant} message/addr-spec-regexp
 474
 475 RFC 822 \e$B$K$*$1$k\e(B addr-spec \e$B$rI=$9@55,I=8=!#\e(B
 476 @end defvr
 477
 478 @deffn{Function} message/get-field-body NAME
 479
 480 message header \e$B$K$*$$$F\e(B @var{NAME} field \e$B$N\e(B body \e$B$rJV$9!#\e(B
 481 @end deffn
 482
 483 @deffn{Function} message/divide-field STR
 484
 485 field \e$BJ8;zNs\e(B @var{STR} \e$B$r\e(B @code{(field-name field-body)} \e$B$H$$$&7A<0$N\e(B
 486 list \e$B$K$7$FJV$9!#\e(B
 487 @end deffn
 488
 489 @deffn{Function} message/parse-addr-spec STR
 490
 491 \e$BJ8;zNs\e(B @var{STR} \e$B$r\e(B addr-spec \e$B$H$7$F9=J82r@O$7!"\e(B@code{(addr-spec \e$B;D$j\e(B)}
 492 \e$B$H$$$&7A<0$N%j%9%H$K$7$FJV$9!#\e(B
 493 @end deffn
 494
 495 @deffn{Function} message/parse-phrase-route-addr STR
 496
 497 \e$BJ8;zNs\e(B @var{STR} \e$B$r\e(B phrase route-addr \e$B$H$7$F9=J82r@O$7!"\e(B@code{((phrase
 498 "<" addr-spec ">") \e$B;D$j\e(B)} \e$B$H$$$&7A<0$N%j%9%H$K$7$FJV$9!#!JCm!'@53N$K$O!"\e(B
 499 route \e$B$b8+$J$1$l$P$$$1$J$$$,!"\e(Broute \e$B$OL5$$$b$N$H$7$F2r@O$7$F$$$k!K\e(B
 500 @end deffn
 501
 502 @deffn{Function} message/parse-comment STR
 503
 504 \e$BJ8;zNs\e(B @var{STR} \e$B$r\e(B comment \e$B$H$7$F9=J82r@O$7!"\e(B@code{(("(" comment ")")
 505 \e$B;D$j\e(B)} \e$B$H$$$&7A<0$N%j%9%H$K$7$FJV$9!#\e(B
 506 @end deffn
 507
 508 @deffn{Function} message/parse-address STR
 509
 510 \e$BJ8;zNs\e(B @var{STR} \e$B$r\e(B address \e$B$H$7$F9=J82r@O$7!"\e(B@code{(address \e$B;D$j\e(B)} \e$B$H\e(B
 511 \e$B$$$&7A<0$N%j%9%H$K$7$FJV$9!#\e(B
 512 @end deffn
 513
 514 @deffn{Function} message/parse-addresses STR
 515
 516 \e$BJ8;zNs\e(B @var{STR} \e$B$r\e(B address list \e$B$H$7$F9=J82r@O$7!"\e(B@code{(address1
 517 address2 ...)} \e$B$H$$$&7A<0$N%j%9%H$K$7$FJV$9!#\e(B
 518 @end deffn
 519
 520 @deffn{Function} message/unfolding-string STR
 521
 522 \e$BJ8;zNs\e(B @var{STR} \e$B$r\e(B field \e$B$H$7$F\e(B unfolding \e$B$7$?J8;zNs$rJV$9!#\e(B
 523 @end deffn
 524
 525 @deffn{Function} message/strip-quoted-string STR
 526
 527 \e$BJ8;zNs\e(B @var{STR} \e$B$r\e(B quoted-string \e$B$H$7$F\e(B strip \e$B$7$?J8;zNs$rJV$9!#\e(B
 528 @end deffn
 529
 530
 531 @node Concept Index, Command Index, Command List, Top
 532 @unnumbered \e$B35G0:w0z\e(B
 533
 534 @printindex cp
 535
 536
 537 @node Command Index, Variable Index, Concept Index, Top
 538 @unnumbered \e$B4X?t!&%3%^%s%I:w0z\e(B
 539
 540 @printindex fn
 541
 542
 543 @node Variable Index, Concept Index, Command Index, Top
 544 @unnumbered \e$BJQ?t:w0z\e(B
 545
 546 @printindex vr
 547
 548 @bye