Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
lyskom-elisp-client
lyskom-elisp-client
Commits
11a4722b
Commit
11a4722b
authored
Nov 19, 1999
by
David Byers
Browse files
Further MULEification
parent
53dd2a58
Changes
45
Hide whitespace changes
Inline
Side-by-side
src/ChangeLog
View file @
11a4722b
1999-11-19 David Byers <davby@ida.liu.se>
* utilities.el (lyskom-truncate-string-to-width): New function
copied from Gnu Emacs.
* Changed file coding of all files to iso-8859-1 since we now have
the ambition to deal with multibyte text.
* lyskom-rest.el (lyskom-format-aux-help): Use
lyskom-truncate-string-to-width instead of substring.
(lyskom-format-aux-help): Use string-width instead of length.
(lyskom-format-aux-help): Same here.
(lyskom-fill-message-line-length): Use current-column instead of
point to calculate current line width.
(lyskom-is-loaded): Encode lyskom-line-start-chars-string in
ISO-8859-1 before using it.
(silent-read): Don't disable multibyte characters.
* defvar.el (lyskom-setup-minibuffer-variables): Don't disable
multibyte characters.
* buffers.el (lyskom-generate-new-buffer): Don't disable multibyte
characters.
(lyskom-get-buffer-create): Same here.
* mime.el (lyskom-mime-string-charset): Use find-charset-string.
* compatibility.el (check-coding-system): Provide dummy
check-coding-system.
* mime.el (lyskom-mime-charset-coding-system): Use
check-coding-system.
* startup.el (lyskom): Decode the motd text mass and format it as
a text.
...
...
src/TODO
View file @
11a4722b
...
...
@@ -3,6 +3,12 @@
Att göra i elisp-klienten
=========================
Kolla alla användningar av length och substring för att se var man
borde använda string-width och truncate-string-to-width istället.
Kolla alla aset och aref så att de inte använder tecken som nyckel
utan omkodning till iso-8859-1 först.
MULEifiera hanteringen av user-arean.
Kolla att spara text sparar med en vettig kodning.
...
...
src/ansaphone.el
View file @
11a4722b
;;;;; -*-coding:
raw-text
;-*-
;;;;; -*-coding:
iso-8859-1
;-*-
;;;;;
;;;;; $Id$
;;;;; Copyright (C) 1991, 1996 Lysator Academic Computer Association.
...
...
src/aux-items.el
View file @
11a4722b
;;;;; -*-coding:
raw-text
;-*-
;;;;; -*-coding:
iso-8859-1
;-*-
;;;;;
;;;;; $Id$
;;;;; Copyright (C) 1991, 1996 Lysator Academic Computer Association.
...
...
src/buffers.el
View file @
11a4722b
;;;;; -*-coding:
raw-text
;-*-
;;;;; -*-coding:
iso-8859-1
;-*-
;;;;;
;;;;; $Id$
;;;;; Copyright (C) 1991, 1996 Lysator Academic Computer Association.
...
...
@@ -290,8 +290,7 @@ categories")
(
defun
lyskom-generate-new-buffer
(
name
)
(
let
((
buf
(
generate-new-buffer
name
)))
(
save-excursion
(
set-buffer
buf
)
(
set-buffer-multibyte
nil
))
(
set-buffer
buf
))
buf
))
(
defun
lyskom-get-buffer-create
(
category
name
&optional
unique
)
...
...
@@ -321,8 +320,7 @@ The created buffer is made a child of the current buffer."
(
lyskom-set-buffer-parent
buffer
(
current-buffer
))
(
lyskom-update-inherited-variables
buffer
)
(
save-excursion
(
set-buffer
buffer
)
(
setq
lyskom-buffer-category
category
)
(
set-buffer-multibyte
nil
))
(
setq
lyskom-buffer-category
category
))
buffer
))
...
...
src/cache.el
View file @
11a4722b
;;;;; -*-coding:
raw-text
;-*-
;;;;; -*-coding:
iso-8859-1
;-*-
;;;;;
;;;;; $Id$
;;;;; Copyright (C) 1991, 1996 Lysator Academic Computer Association.
...
...
src/check-strings.el
View file @
11a4722b
;;;;; -*-coding:
raw-text
;-*-
;;;;; -*-coding:
iso-8859-1
;-*-
;;;;;
;;;;; $Id$
;;;;; Copyright (C) 1996 Lysator Academic Computer Association.
...
...
src/clienttypes.el
View file @
11a4722b
;;;;; -*-coding:
raw-text
;-*-
;;;;; -*-coding:
iso-8859-1
;-*-
;;;;;
;;;;; $Id$
;;;;; Copyright (C) 1991, 1996 Lysator Academic Computer Association.
...
...
src/command.el
View file @
11a4722b
;;;;; -*-coding:
raw-text
;-*-
;;;;; -*-coding:
iso-8859-1
;-*-
;;;;;
;;;;; $Id$
;;;;; Copyright (C) 1991, 1996 Lysator Academic Computer Association.
...
...
src/commands1.el
View file @
11a4722b
;;;;; -*-coding:
raw-text
;-*-
;;;;; -*-coding:
iso-8859-1
;-*-
;;;;;
;;;;; $Id$
;;;;; Copyright (C) 1991, 1996 Lysator Academic Computer Association.
...
...
src/commands2.el
View file @
11a4722b
;;;;; -*-coding:
raw-text
;-*-
;;;;; -*-coding:
iso-8859-1
;-*-
;;;;;
;;;;; $Id$
;;;;; Copyright (C) 1991, 1996 Lysator Academic Computer Association.
...
...
src/compatibility.el
View file @
11a4722b
;;;;; -*-coding:
raw-text
;-*-
;;;;; -*-coding:
iso-8859-1
;-*-
;;;;;
;;;;; $Id$
;;;;; Copyright (C) 1996 Lysator Academic Computer Association.
...
...
@@ -285,6 +285,10 @@ string to search in."
(
lyskom-provide-function
encode-coding-string
(
str
coding-system
)
str
)
(
lyskom-provide-function
decode-coding-string
(
str
coding-system
)
str
)
(
lyskom-provide-function
string-bytes
(
str
)
(
length
str
))
(
lyskom-provide-function
check-coding-system
(
name
)
nil
)
(
lyskom-provide-function
string-width
(
str
)
(
length
str
))
(
lyskom-provide-function
char-width
(
c
)
1
)
(
lyskom-provide-function
find-charset-string
(
str
)
'
(
ascii
))
(
lyskom-provide-function
last
(
x
&optional
n
)
"Returns the last link in the list LIST.
...
...
src/completing-read.el
View file @
11a4722b
;;;;; -*-coding:
raw-text
;-*-
;;;;; -*-coding:
iso-8859-1
;-*-
;;;;;
;;;;; $Id$
;;;;; Copyright (C) 1991, 1996 Lysator Academic Computer Association.
...
...
src/deferred-insert.el
View file @
11a4722b
;;;;; -*-coding:
raw-text
;-*-
;;;;; -*-coding:
iso-8859-1
;-*-
;;;;;
;;;;; $Id$
;;;;; Copyright (C) 1996 Lysator Academic Computer Association.
...
...
src/defvar.el
View file @
11a4722b
;;;;; -*-coding:
raw-text
;-*-
;;;;; -*-coding:
iso-8859-1
;-*-
;;;;;
;;;;; $Id$
;;;;; Copyright (C) 1991, 1996 Lysator Academic Computer Association.
...
...
@@ -119,8 +119,7 @@ is saved before executing FORMS and restored when FORMS have finished."
(
make-local-variable
(
car
syms
))
(
set
(
car
syms
)
(
car
vals
))
(
setq
syms
(
cdr
syms
)
vals
(
cdr
vals
)))
(
set-buffer-multibyte
nil
)))
vals
(
cdr
vals
)))))
...
...
src/edit-text.el
View file @
11a4722b
;;;;; -*-coding:
raw-text
;-*-
;;;;; -*-coding:
iso-8859-1
;-*-
;;;;;
;;;;; $Id$
;;;;; Copyright (C) 1991, 1996 Lysator Academic Computer Association.
...
...
src/elib-string.el
View file @
11a4722b
;;;;; -*-coding:
raw-text
;-*-
;;;;; -*-coding:
iso-8859-1
;-*-
;;;; $Id$
;;;; This file contains some miscellaneous string functions
...
...
src/english-strings.el
View file @
11a4722b
;;;;; -*-coding:
raw-text
;-*-
;;;;; -*-coding:
iso-8859-1
;-*-
;;;;;
;;;;; $Id$
;;;;; Copyright (C) 1991, 1996 Lysator Academic Computer Association.
...
...
src/envcheck.el
View file @
11a4722b
;;;;; -*-coding:
raw-text
;-*-
;;;;; -*-coding:
iso-8859-1
;-*-
;;;;;
;;;;; $Id$
;;;;; Copyright (C) 1991, 1996 Lysator Academic Computer Association.
...
...
src/feature.el
View file @
11a4722b
;;;;; -*-coding:
raw-text
;-*-
;;;;; -*-coding:
iso-8859-1
;-*-
;;;;;
;;;;; $Id$
;;;;; Copyright (C) 1991, 1996 Lysator Academic Computer Association.
...
...
Prev
1
2
3
Next
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment