Source

apel / README.en

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
[README for APEL (English Version)]

What's APEL?
============

  APEL stands for "A Portable Emacs Library".  It consists of
  following modules:

    poe.el --- emulation module mainly for basic functions and special
	       forms/macros of latest emacsen
      poe-xemacs.el  --- for XEmacs
      poe-18.el	     --- for Emacs 18/Nemacs
         env.el      --- env.el for Emacs 18
      localhook.el   --- hook functions for Emacs 19.28 and earlier.

    poem.el --- provide basic functions to write portable MULE
		programs
      poem-nemacs.el --- for Nemacs
      poem-ltn1.el   --- for Emacs 19/XEmacs without MULE
      poem-om.el     --- for MULE 1.*, 2.*
      poem-20.el     --- shared module between Emacs 20 and XEmacs-MULE
      poem-e20_2.el  --- for Emacs 20.1/20.2
      poem-e20_3.el  --- for Emacs 20.3
      poem-xm.el     --- for XEmacs-MULE

    invisible.el --- provide features about invisible region
      inv-18.el     --- for Emacs 18
      inv-19.el     --- for Emacs 19
      inv-xemacs.el --- for XEmacs

    mcharset.el --- provide MIME charset related features
      mcs-nemacs.el --- for Nemacs
      mcs-ltn1.el   --- for Emacs 19/XEmacs without MULE
      mcs-om.el     --- for MULE 1.*, 2.*
      mcs-20.el     --- shared module between Emacs 20 and XEmacs-MULE
      mcs-e20.el    --- for Emacs 20
      mcs-xm.el     --- for XEmacs-MULE
      mcs-xmu.el    --- for XEmacs-MULE to unify ISO646 characters

    static.el --- utility for static evaluation

    broken.el --- provide information of broken facilities of Emacs

    pccl.el --- utility to write portable CCL program
      pccl-om.el --- for MULE 2.*
      pccl-20.el --- for Emacs 20/XEmacs-21-MULE

    alist.el: utility for Association-list

    calist.el: utility for condition tree and
	       condition/situation-alist

    path-util.el: utility for path management or file detection

    filename.el: utility to make file-name

    install.el: utility to install emacs-lisp package

    mule-caesar.el: ROT 13-47-48 Caesar rotation utility

    emu.el --- (emu bundled in tm-7.106 compatibility module; it
	        required poe, poem and mcharset)
      emu-mule:	for MULE 1.*, 2.*
      richtext.el   --- text/richtext module
			for Emacs 19.29 or later,
			    XEmacs 19.14 or later
      tinyrich.el   --- text/richtext module for old emacsen

    pcustom.el --- provide portable custom environment

      tinycustom.el --- emulation module of custom.el


Installation
============

(a) run in expanded place

  If you don't want to install other directories, please do only
  following:

	% make

  You can specify the emacs command name, for example

	% make EMACS=xemacs

  If `EMACS=...' is omitted, EMACS=emacs is used.

(b) make install

  If you want to install other directories, please do following:

	% make install

  You can specify the emacs command name, for example

	% make install EMACS=xemacs

  If `EMACS=...' is omitted, EMACS=emacs is used.

  You can specify the prefix of the directory tree for Emacs Lisp
  programs and shell scripts, for example:

	% make install PREFIX=~/

  If `PREFIX=...' is omitted, the prefix of the directory tree of the
  specified emacs command is used (perhaps /usr/local).

  For example, if PREFIX=/usr/local and Emacs 20.2 is specified, it
  will create the following directory tree:

	/usr/local/share/emacs/20.2/site-lisp/	--- emu
	/usr/local/share/emacs/site-lisp/apel/	--- APEL

  You can specify the lisp directory for Emacs Lisp programs,
  for example:

	% make install LISPDIR=~/elisp

  You can also specify the version specific lisp directory where the
  emu modules will be installed in, for example:

	% make install VERSION_SPECIFIC_LISPDIR=~/elisp

  If you would like to know what files belong to the emu modules or
  the apel modules, or where they will be installed in, for example,
  please type the following command.

	% make what-where LISPDIR=~/elisp VERSION_SPECIFIC_LISPDIR=~/elisp

  You can specify other optional settings by editing the file
  APEL-CFG.  Please read comments in it.

(c) install as a XEmacs package

  If you want to install to XEmacs package directory, please do
  following:

	% make install-package

  You can specify the emacs command name, for example

	% make install-package XEMACS=xemacs-21

  If `XEMACS=...' is omitted, XEMACS=xemacs is used.

  You can specify the package directory, for example:

	% make install PACKAGEDIR=~/.xemacs

  If `PACKAGEDIR=...' is omitted, the first existing package
  directory is used.

  Notice that XEmacs package system requires XEmacs 21.0 or later.


load-path (for Emacs or MULE)
=============================

  If you are using Emacs or Mule, please add directory of apel to
  load-path.  If you install by default setting with Emacs 19.29 or
  later or Emacs 20.1/20.2, you can write subdirs.el for example:

  --------------------------------------------------------------------
  (normal-top-level-add-to-load-path '("apel"))
  --------------------------------------------------------------------

  If you are using Emacs 20.3 or later or XEmacs, there are no need to
  set up load-path with normal installation.


Version specific information
============================

For Emacs 18 users: "old byte-compiler" vs "new byte-compiler"

  In this package, we use compile-time evaluation heavily.
  Unfortunately, the byte-compiler bundled with Emacs 18 (the "old
  byte-compiler") does not have features such as `eval-when-compile'
  and `eval-and-compile', and our emulation version of these macros
  evaluate "compile-time evaluation" at load-time or at run-time!
  In addition, the "old byte-compiler" cannot compile top-level use of
  macros and leaves most of our code uncompiled.

  Therefore, we recommend you to use the "new" optimizing byte-compiler.
  It is the origin of byte-compiler bundled with Emacs 19 and later.

  Optimizing byte-compiler for Emacs 18 is available from the Emacs
  Lisp Archive and its mirrors.

  In Mule 1.* days, "contrib" package for Mule 1.* was distributed and
  it contained the "new byte-compiler" for Mule.  But, I think it is
  difficult to obtain this package now.

  AFAIK, the "new byte-compiler" for Emacs 18 is also bundled with SKK
  9.6.  It includes patch for Mule 1.*.


For Emacs 19.34 and XEmacs 19.14 users: "old custom" vs "new custom"

  "custom" library bundled with Emacs 19.32 - 19.34, XEmacs 19.14, and
  Gnus 5.2/5.3 is "old", its API is incompatible with "new custom"
  bundled with Emacs 20.1, XEmacs 19.15, or newer, and Gnus 5.4/5.5.

  "new custom" for Emacs 19.34 and XEmacs 19.15 - 20.2 is available
  from the following URL.

  ftp://ftp.dina.kvl.dk/pub/Staff/Per.Abrahamsen/custom/custom-1.9962.tar.gz

  (Note that "new custom" bundled with XEmacs 19.15 - 20.2, and Gnus
  5.4/5.5 is older than this version.)

  Before installing "new custom", you should check the following points.

    1) If you stick to Gnus 5.2/5.3 (or any other applications which
       use "old custom"), you should not install "new custom".

    2) If you use Mule (based on Emacs 19), you must apply this patch
       to "new custom".

----8<------8<------8<------8<------8<------8<------8<------8<----
--- custom-1.9962/cus-face.el~	Wed Mar  4 19:52:39 1998
+++ custom-1.9962/cus-face.el	Mon Mar  9 08:05:33 1998
@@ -96,7 +96,7 @@
       "Define a new FACE on all frames, ignoring X resources."
       (interactive "SMake face: ")
       (or (internal-find-face name)
-	  (let ((face (make-vector 8 nil)))
+	  (let ((face (make-vector face-vector-length nil)))
 	    (aset face 0 'face)
 	    (aset face 1 name)
 	    (let* ((frames (frame-list))
----8<------8<------8<------8<------8<------8<------8<------8<----

    3) Applications compiled with "custom" require the same version of
       "custom" at load-time (and run-time).  Therefore, if you use
       "new custom", you must always include "new custom" in your
       load-path.  The easiest way to achieve this is "subdirs.el";
       if you installed "new custom" in "/usr/local/share/emacs/19.34/
       site-lisp/custom/", put the following line to "/usr/local/share/
       emacs/19.34/site-lisp/subdirs.el".

       (normal-top-level-add-to-load-path '("custom"))


How to use
==========

alist
-----

Function put-alist (ITEM VALUE ALIST)

  Modify ALIST to set VALUE to ITEM.  If there is a pair whose car is
  ITEM, replace its cdr by VALUE.  If there is not such pair, create
  new pair (ITEM . VALUE) and return new alist whose car is the new
  pair and cdr is ALIST.

Function del-alist (ITEM ALIST)

  If there is a pair whose key is ITEM, delete it from ALIST.

Function set-alist (SYMBOL ITEM VALUE)

  Modify a alist indicated by SYMBOL to set VALUE to ITEM.

  Ex. (set-alist 'auto-mode-alist "\\.pln$" 'text-mode)

Function modify-alist (MODIFIER DEFAULT)

  Modify alist DEFAULT into alist MODIFIER.

Function set-modified-alist (SYMBOL MODIFIER)

  Modify a value of a SYMBOL into alist MODIFIER.  The SYMBOL should
  be alist. If it is not bound, its value regard as nil.

path-util
---------

Function add-path (PATH &rest OPTIONS)

  Add PATH to `load-path' if it exists under `default-load-path'
  directories and it does not exist in `load-path'.

  You can use following PATH styles:

    load-path relative: "PATH" (it is searched from
				`default-load-path')

    home directory relative: "~/PATH" "~USER/PATH"

    absolute path: "/FOO/BAR/BAZ"

  You can specify following OPTIONS:

    'all-paths --- search from `load-path' instead of
	           `default-load-path'

    'append --- add PATH to the last of `load-path'

Function add-latest-path (PATTERN &optional ALL-PATHS)

  Add latest path matched by regexp PATTERN to `load-path' if it
  exists under `default-load-path' directories and it does not exist
  in `load-path'.

  For example, if there is bbdb-1.50 and bbdb-1.51 under site-lisp,
  and if bbdb-1.51 is newer than bbdb-1.50, and site-lisp is
  /usr/local/share/emacs/site-lisp,

	(add-latest-path "bbdb")

  it adds "/usr/local/share/emacs/site-lisp/bbdb-1.51" to top of
  `load-path'.

  If optional argument ALL-PATHS is specified, it is searched from all
  of `load-path' instead of `default-load-path'.

Function get-latest-path (PATTERN &optional ALL-PATHS)

  Return latest directory in default-load-path which is matched to
  regexp PATTERN.  If optional argument ALL-PATHS is specified, it is
  searched from all of load-path instead of default-load-path.

  Ex. (let ((gnus-path (get-latest-path "gnus")))
        (add-path (expand-file-name "lisp" gnus-path))
        (add-to-list 'Info-default-directory-list
		     (expand-file-name "texi" gnus-path))
        )

Function file-installed-p (FILE &optional PATHS)

  Return absolute-path of FILE if FILE exists in PATHS.  If PATHS is
  omitted, `load-path' is used.

Function exec-installed-p (FILE &optional PATHS SUFFIXES)

  Return absolute-path of FILE if FILE exists in PATHS.  If PATHS is
  omitted, `exec-path' is used.  If SUFFIXES is omitted,
  `exec-suffix-list' is used.

Function module-installed-p (MODULE &optional PATHS)

  Return non-nil if MODULE is provided or exists in PATHS.  If PATHS
  is omitted, `load-path' is used.

filename
--------

Function replace-as-filename (string)

  Return safety file-name from STRING.

  It refers variable `filename-filters'.  It is list of functions for
  file-name filter.  Default filter refers following variables:

	Variable filename-limit-length

	  Limit size of file-name.

	Variable filename-replacement-alist

	  Alist list of characters vs. string as replacement.  List of
          characters represents characters not allowed as file-name.


Bug reports
===========

  If you write bug-reports and/or suggestions for improvement, please
  send them to the APEL Mailing List:

	apel-en@m17n.org	(English)
	apel-ja@m17n.org	(Japanese)

  Via the APEL ML, you can report APEL bugs, obtain the latest release
  of APEL, and discuss future enhancements to APEL.  To join the APEL
  ML, send an empty e-mail to

	apel-en-ctl@m17n.org	(English)
	apel-ja-ctl@m17n.org	(Japanese)


Anonymous FTP
=============

  Latest release of APEL can be obtained from:

    ftp://ftp.m17n.org/pub/mule/apel/


CVS
===

  Development of APEL uses CVS.  So latest developing version is
  available at CVS.

(0) cvs login (first time only)

    % cvs -d :pserver:anonymous@cvs.m17n.org:/cvs/root login

    CVS password: [CR] # NULL string

(1) checkout

    % cvs -d :pserver:anonymous@cvs.m17n.org:/cvs/root checkout apel

  If you would like to join CVS based development, please send mail to

	cvs@cvs.m17n.org

  with your account name and your public key for ssh.  cvsroot is
  :ext:cvs@cvs.m17n.org:/cvs/root.

  If you cannot use ssh, please send UNIX /etc/passwd style crypted
  password.  you can commit with the cvsroot
  :pserver:<accountname>@cvs.m17n.org:/cvs/root.

  We hope you will join the open development.
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.