procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

avoid function from `cl'

Browse source
This commit is contained in:
Sam Steingold 2014-05-12 19:56:22 -04:00
parent ecaf7f4dc0
commit 001da405b6
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/calendar/time-date.el
View file

@ -404,7 +404,7 @@ This function does not work for SECONDS greater than `most-positive-fixnum'."
(t (let ((sts seconds-to-string) here)
(while (and (car (setq here (pop sts)))
(<= (car here) delay)))
(concat (format "%.2f" (/ delay (third here))) (second here))))))
(concat (format "%.2f" (/ delay (car (cddr here)))) (cadr here))))))
(provide 'time-date)