[uim-commit] r172 - trunk/scm

[yamaken@freedesktop.org]

Author: yamaken
Date: 2005-01-08 05:14:41 -0800 (Sat, 08 Jan 2005)
New Revision: 172

Modified:
   trunk/scm/custom-vars.scm
   trunk/scm/skk.scm
Log:
* scm/skk.scm
  - (skk-dic-file-name): Replace hardcoded directory with sys-datadir
* scm/custom-vars.scm
  - (custom skk-dic-file-name): Replace hardcoded directory for
    default value with sys-datadir


Modified: trunk/scm/custom-vars.scm
===================================================================
--- trunk/scm/custom-vars.scm	2005-01-08 13:09:58 UTC (rev 171)
+++ trunk/scm/custom-vars.scm	2005-01-08 13:14:41 UTC (rev 172)
@@ -362,7 +362,8 @@
 		     skk-im-canonical-name
 		     skk-im-desc)
 
-(define-custom 'skk-dic-file-name "/usr/share/skk/SKK-JISYO.L"
+(define-custom 'skk-dic-file-name (string-append (sys-datadir)
+						 "/skk/SKK-JISYO.L")
   '(skk)
   '(pathname)
   (_ "Dictionary file")

Modified: trunk/scm/skk.scm
===================================================================
--- trunk/scm/skk.scm	2005-01-08 13:09:58 UTC (rev 171)
+++ trunk/scm/skk.scm	2005-01-08 13:14:41 UTC (rev 172)
@@ -48,7 +48,8 @@
 
 ;;; user configs
 
-(define skk-dic-file-name "/usr/share/skk/SKK-JISYO.L")
+(define skk-dic-file-name
+  (string-append (sys-datadir) "/skk/SKK-JISYO.L"))
 (define skk-personal-dic-filename
   (string-append (getenv "HOME") "/.skk-jisyo"))
 (define skk-uim-personal-dic-filename