[Emacs-diffs] Changes to emacs/lisp/calendar/cal-bahai.el

[Juanma Barranquero]

Index: emacs/lisp/calendar/cal-bahai.el
diff -c emacs/lisp/calendar/cal-bahai.el:1.9 
emacs/lisp/calendar/cal-bahai.el:1.10
*** emacs/lisp/calendar/cal-bahai.el:1.9        Mon Jul  4 17:37:03 2005
--- emacs/lisp/calendar/cal-bahai.el    Fri Aug 26 11:19:05 2005
***************
*** 54,59 ****
--- 54,65 ----
  
  ;;; Code:
  
+ (defvar date)
+ (defvar displayed-month)
+ (defvar displayed-year)
+ (defvar number)
+ (defvar original-date)
+ 
  (require 'cal-julian)
  
  (defvar bahai-calendar-month-name-array
***************
*** 215,221 ****
              (mark (regexp-quote diary-nonmarking-symbol)))
          (calendar-for-loop i from 1 to number do
             (let* ((d diary-date-forms)
!                   (bdate (calendar-bahai-from-absolute 
                            (calendar-absolute-from-gregorian gdate)))
                    (month (extract-calendar-month bdate))
                    (day (extract-calendar-day bdate))
--- 221,227 ----
              (mark (regexp-quote diary-nonmarking-symbol)))
          (calendar-for-loop i from 1 to number do
             (let* ((d diary-date-forms)
!                   (bdate (calendar-bahai-from-absolute
                            (calendar-absolute-from-gregorian gdate)))
                    (month (extract-calendar-month bdate))
                    (day (extract-calendar-day bdate))
***************
*** 460,466 ****
      (make-diary-entry
       (concat
        bahai-diary-entry-symbol
!       (calendar-date-string 
         (calendar-bahai-from-absolute
          (calendar-absolute-from-gregorian
           (calendar-cursor-to-date t)))
--- 466,472 ----
      (make-diary-entry
       (concat
        bahai-diary-entry-symbol
!       (calendar-date-string
         (calendar-bahai-from-absolute
          (calendar-absolute-from-gregorian
           (calendar-cursor-to-date t)))
***************
*** 478,484 ****
      (make-diary-entry
       (concat
        bahai-diary-entry-symbol
!       (calendar-date-string 
         (calendar-bahai-from-absolute
          (calendar-absolute-from-gregorian
           (calendar-cursor-to-date t)))))
--- 484,490 ----
      (make-diary-entry
       (concat
        bahai-diary-entry-symbol
!       (calendar-date-string
         (calendar-bahai-from-absolute
          (calendar-absolute-from-gregorian
           (calendar-cursor-to-date t)))))
***************
*** 497,503 ****
      (make-diary-entry
       (concat
        bahai-diary-entry-symbol
!       (calendar-date-string 
         (calendar-bahai-from-absolute
          (calendar-absolute-from-gregorian
           (calendar-cursor-to-date t)))))
--- 503,509 ----
      (make-diary-entry
       (concat
        bahai-diary-entry-symbol
!       (calendar-date-string
         (calendar-bahai-from-absolute
          (calendar-absolute-from-gregorian
           (calendar-cursor-to-date t)))))