summaryrefslogtreecommitdiff
path: root/textproc/coco/files/patch-md
blob: 99ab6981333032b6078709fec60cf7bcb22d1475 (plain) (blame)
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
diff -arcN ../mule-2.3.org/etc/FAQ-Mule.jp ./etc/FAQ-Mule.jp
*** ../mule-2.3.org/etc/FAQ-Mule.jp	Fri Jul 21 20:40:06 1995
--- ./etc/FAQ-Mule.jp	Wed Aug 21 11:33:22 1996
***************
*** 1867,1872 ****
--- 1867,1874 ----
  
     $B$H=q$/J}K!$b$"$j$^$9!#(B 
  
+    ($BCm5-(B : FreeBSD$B$G$O!"B>$H6%9g$9$k$?$a%]!<%HHV9f$O(B3086$B$K$7$F$"$j$^$9!#(B)
+ 
  Emacs lisp $B%W%m%0%i%_%s%0(B
  =========================
  
diff -arcN ../mule-2.3.org/lisp/eggrc-sj3 ./lisp/eggrc-sj3
*** ../mule-2.3.org/lisp/eggrc-sj3	Fri Oct 21 13:18:21 1994
--- ./lisp/eggrc-sj3	Wed Aug 21 13:05:24 1996
***************
*** 3,11 ****
  ;;;	Version 1.0
  ;;;	Copyright 1990 Kiyoji Ishii
  ;;;
  
! (set-default-sys-dic-directory "/usr/sony/dict/sj3")
! (set-default-usr-dic-directory "/usr/sony/dict/sj3/user/$USER")
  
  ;;;
  ;;; System Dictionary
--- 3,17 ----
  ;;;	Version 1.0
  ;;;	Copyright 1990 Kiyoji Ishii
  ;;;
+ ;;;
+ ;;; Change dictionary paths.
+ ;;; Patched by Hidekazu Kuroki(hidekazu@cs.titech.ac.jp)		1996/8/10
+ ;;; Remove $USER variable. Use (user-login-name).
+ ;;; Patched by Hidekazu Kuroki(hidekazu@cs.titech.ac.jp)		1996/8/20
+ ;;;
  
! (set-default-sys-dic-directory "/usr/local/lib/sj3/dict")
! (set-default-usr-dic-directory (concat "/usr/local/lib/sj3/dict/user/" (user-login-name)))
  
  ;;;
  ;;; System Dictionary
diff -arcN ../mule-2.3.org/lisp/sj3-egg.el ./lisp/sj3-egg.el
*** ../mule-2.3.org/lisp/sj3-egg.el	Fri Feb 17 17:23:31 1995
--- ./lisp/sj3-egg.el	Wed Aug 21 13:32:36 1996
***************
*** 294,301 ****
  ;;;
  ;;; Entry functions for egg-startup-file
  ;;;
  
! (defvar *default-sys-dic-directory* "/usr/sony/dict/sj3")
  
  (defun set-default-sys-dic-directory (pathname)
    "$B%7%9%F%`<-=q$NI8=`(Bdirectory PATHNAME$B$r;XDj$9$k!#(B
--- 294,307 ----
  ;;;
  ;;; Entry functions for egg-startup-file
  ;;;
+ ;;;
+ ;;; Change dictionary paths.
+ ;;; Patched by Hidekazu Kuroki(hidekazu@cs.titech.ac.jp)		1996/8/10
+ ;;; Remove $USER variable. Use (user-login-name).
+ ;;; Patched by Hidekazu Kuroki(hidekazu@cs.titech.ac.jp)		1996/8/20
+ ;;;
  
! (defvar *default-sys-dic-directory* "/usr/local/lib/sj3/dict")
  
  (defun set-default-sys-dic-directory (pathname)
    "$B%7%9%F%`<-=q$NI8=`(Bdirectory PATHNAME$B$r;XDj$9$k!#(B
***************
*** 310,316 ****
  	 (format "System Default directory(%s) $B$,$"$j$^$;$s!#(B" pathname))
        (setq *default-sys-dic-directory* (file-name-as-directory pathname)))))
  
! (defvar *default-usr-dic-directory* "/usr/sony/dict/sj3/user/$USER")
  
  (defun set-default-usr-dic-directory (pathname)
    "$BMxMQ<T<-=q$NI8=`(Bdirectory PATHNAME$B$r;XDj$9$k!#(B
--- 316,322 ----
  	 (format "System Default directory(%s) $B$,$"$j$^$;$s!#(B" pathname))
        (setq *default-sys-dic-directory* (file-name-as-directory pathname)))))
  
! (defvar *default-usr-dic-directory* (concat "/usr/local/lib/sj3/dict/user/" (user-login-name)))
  
  (defun set-default-usr-dic-directory (pathname)
    "$BMxMQ<T<-=q$NI8=`(Bdirectory PATHNAME$B$r;XDj$9$k!#(B