tamago-4.0.3

[elisp/tamago.git] / egg / sj3.el

diff --git a/egg/sj3.el b/egg/sj3.el
index d1d1f56..69b5aa4 100644 (file)
--- a/egg/sj3.el
+++ b/egg/sj3.el
@@ -31,9 +31,22 @@
 
 ;;; Code:
 
-
+(require 'egg)
 (require 'egg-edep)
 
+(defgroup sj3 nil
+  "SJ3 interface for Tamago 4"
+  :group 'egg)
+
+(defcustom  sj3-hostname "localhost"
+  "*Hostname of SJ3 server"
+  :group 'sj3 :type 'string)
+
+(defcustom  sj3-server-port 3086 
+  "*Port number of SJ3 server"
+  :group 'sj3 :type 'integer)
+
+
 (eval-when-compile
   (defmacro SJ3-const (c)
     (cond ((eq c 'FileNotExist) 35)
@@ -54,10 +67,7 @@
 
 (egg-set-finalize-backend '(sj3-finalize-backend))
 
-(defvar sj3-server-port 3086 "Port number of SJ3 server")
 (defvar sj3-stdy-size 0 "STDYSIZE of SJ3 server")
-(defvar sj3-hostname "localhost"
-  "Hostname of SJ3 server")
 
 (defvar sj3-open-message)