Make error: calendar/solar.el:51:1:Error: Invalid function: (calendar-persian-to-absolute (\` (1 1 (\, (- year 621)))))

Make error: calendar/solar.el:51:1:Error: Invalid function: (calendar-persian-to-absolute (\` (1 1 (\, (- year 621)))))

[Fabian Ezequiel Gallina]

Hi, I updated my local copy of Emacs CVS repository and when I run
make I get this error and Emacs does not compiles any further.

This is the relevant part of the output:

make[1]: se ingresa al directorio `/home/fgallina/emacs/lisp'
Compiling /home/fgallina/emacs/lisp/calendar/solar.el

In toplevel form:
calendar/solar.el:51:1:Error: Invalid function:
(calendar-persian-to-absolute (\` (1 1 (\, (- year 621)))))
make[1]: *** [/home/fgallina/emacs/lisp/calendar/solar.elc] Error 1
make[1]: se sale del directorio `/home/fgallina/emacs/lisp'
make: *** [lisp] Error 2


Any help is very much appreciated.


Regards,
Fabián E. Gallina

Re: Make error: calendar/solar.el:51:1:Error: Invalid function: (calendar-persian-to-absolute (\` (1 1 (\, (- year 621)))))

[Glenn Morris]

There's no need to send me mails off-list.

Fabian Ezequiel Gallina wrote:

> calendar/solar.el:51:1:Error: Invalid function:
> (calendar-persian-to-absolute (\` (1 1 (\, (- year 621)))))
> make[1]: *** [/home/fgallina/emacs/lisp/calendar/solar.elc] Error 1
> make[1]: se sale del directorio `/home/fgallina/emacs/lisp'
> make: *** [lisp] Error 2

Interesting. Does this help?


diff -c -c -w -r1.49 cal-dst.el
*** cal-dst.el	5 Jan 2009 03:20:32 -0000	1.49
--- cal-dst.el	9 Jun 2009 19:31:53 -0000
***************
*** 229,235 ****
          (setq date (cond ((eq (car rule) 'calendar-nth-named-day)
                            (eval (cons 'calendar-nth-named-absday (cdr rule))))
                           ((eq (car rule) 'calendar-gregorian-from-absolute)
!                           (eval (cdr rule)))
                           (t (calendar-absolute-from-gregorian (eval rule)))))
          (or (equal (current-time-zone
                      (calendar-time-from-absolute date prevday-sec))
--- 229,235 ----
          (setq date (cond ((eq (car rule) 'calendar-nth-named-day)
                            (eval (cons 'calendar-nth-named-absday (cdr rule))))
                           ((eq (car rule) 'calendar-gregorian-from-absolute)
!                           (eval (cadr rule)))
                           (t (calendar-absolute-from-gregorian (eval rule)))))
          (or (equal (current-time-zone
                      (calendar-time-from-absolute date prevday-sec))