]> code.delx.au - gnu-emacs/blobdiff - lisp/international/ja-dic-cnv.el
Merge from emacs--devo--0
[gnu-emacs] / lisp / international / ja-dic-cnv.el
index 711b1342d7f222a9971ed5d8b790738e96947f03..f6aa892aafec2c9071fcfc9816b28ffe6ecc64ca 100644 (file)
@@ -1,7 +1,7 @@
 ;;; ja-dic-cnv.el --- convert a Japanese dictionary (SKK-JISYO.L) to Emacs Lisp
 
 ;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
-;;   2005, 2006
+;;   2005, 2006, 2007
 ;;   National Institute of Advanced Industrial Science and Technology (AIST)
 ;;   Registration Number H14PRO021
 
@@ -366,7 +366,7 @@ The name of generated file is specified by the variable `ja-dic-filename'."
              ";;\tGenerated by the command `skkdic-convert'\n"
              ";;\tDate: " (current-time-string) "\n"
              ";;\tOriginal SKK dictionary file: "
-             (file-name-nondirectory filename)
+             (file-relative-name (expand-file-name filename) dirname)
              "\n\n"
              ";; This file is part of GNU Emacs.\n\n"
              ";;; Commentary:\n\n"