From c2743a69d2922036c9c1663bfd1cc1a1adad1c51 Mon Sep 17 00:00:00 2001 From: akr Date: Wed, 26 Aug 1998 08:15:04 +0000 Subject: [PATCH] * ew-scan-n.el: New file. --- ChangeLog | 4 ++++ ew-scan-n.el | 13 +++++++++++++ 2 files changed, 17 insertions(+) create mode 100644 ew-scan-n.el diff --git a/ChangeLog b/ChangeLog index 8ed500a..b06c3c0 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,9 @@ 1998-08-26 Tanaka Akira + * ew-scan-n.el: New file. + +1998-08-26 Tanaka Akira + * FLIM-ELS (flim-modules): Add `ew-scan-n'. * ew-dec.el: Require 'ew-scan-n. diff --git a/ew-scan-n.el b/ew-scan-n.el new file mode 100644 index 0000000..e89fcef --- /dev/null +++ b/ew-scan-n.el @@ -0,0 +1,13 @@ +(require 'ew-data) +(require 'ew-parse) +(provide 'ew-scan-n) + +(defun ew-scan-none (col str) + (let ((res (ew-make-anchor col str))) + (ew-add-frag res 0 (length str) 'ew:n-body) + (ew-terminate res) + res)) + +(defalias 'ew-scan-unibyte-none 'ew-scan-none) +(defalias 'ew-scan-multibyte-none 'ew-scan-none) + -- 1.7.10.4