* elmo-util.el (elmo-copy-file): Fixed typo.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 92debf1..ddce07f 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -2,6 +2,7 @@
 
        * elmo-util.el (elmo-copy-file): Added argument
        `ok-if-already-exists'.
+       (elmo-copy-file): Fixed typo.
 
 2001-11-21  Kenichi OKADA  <okada@opaopa.org>
 

diff --git a/elmo/elmo-util.el b/elmo/elmo-util.el
index 2322005..c829cde 100644 (file)
--- a/elmo/elmo-util.el
+++ b/elmo/elmo-util.el
@@ -1066,7 +1066,7 @@ Emacs 19.28 or earlier does not have `unintern'."
       (setq filename (substring filename (+ (match-end 0) 1))))
     (concat result filename)))
 
-(defsubst elmo-copy-file (src dst &otional ok-if-already-exists)
+(defsubst elmo-copy-file (src dst &optional ok-if-already-exists)
   (condition-case err
       (elmo-add-name-to-file src dst ok-if-already-exists)
     (error (copy-file src dst ok-if-already-exists t))))