# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1207515211 0
# Node ID adddea858c0dcd23afa7bb6694d9cf997f12703c
# Parent  664ca9007b13099357aaeaa0a7d814eb8876df1f
Update for diary-lib name changes.

diff -r 664ca9007b13 -r adddea858c0d lisp/calendar/icalendar.el
--- a/lisp/calendar/icalendar.el	Sun Apr 06 20:53:14 2008 +0000
+++ b/lisp/calendar/icalendar.el	Sun Apr 06 20:53:31 2008 +0000
@@ -2126,8 +2126,11 @@
       (unless diary-file
         (setq diary-file
               (read-file-name "Add appointment to this diary file: ")))
-      ;; Note: make-diary-entry will add a trailing blank char.... :(
-      (make-diary-entry string non-marking diary-file)))
+      ;; Note: diary-make-entry will add a trailing blank char.... :(
+      (funcall (if (fboundp 'diary-make-entry)
+                   'diary-make-entry
+                 'make-diary-entry)
+               string non-marking diary-file)))
   ;; return diary-file in case it has been changed interactively
   diary-file)