Commit d18d0261 authored by Glenn Morris's avatar Glenn Morris

(mark-islamic-calendar-date-pattern): Use zerop.

Comments.
parent c9549281
;;; cal-islam.el --- calendar functions for the Islamic calendar ;;; cal-islam.el --- calendar functions for the Islamic calendar
;; Copyright (C) 1995, 1997, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 ;; Copyright (C) 1995, 1997, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
;; Free Software Foundation, Inc. ;; 2008 Free Software Foundation, Inc.
;; Author: Edward M. Reingold <reingold@cs.uiuc.edu> ;; Author: Edward M. Reingold <reingold@cs.uiuc.edu>
;; Maintainer: Glenn Morris <rgm@gnu.org> ;; Maintainer: Glenn Morris <rgm@gnu.org>
...@@ -402,8 +402,8 @@ provided for use as part of the nongregorian-diary-marking-hook." ...@@ -402,8 +402,8 @@ provided for use as part of the nongregorian-diary-marking-hook."
A value of 0 in any position is a wildcard." A value of 0 in any position is a wildcard."
(save-excursion (save-excursion
(set-buffer calendar-buffer) (set-buffer calendar-buffer)
(if (and (/= 0 month) (/= 0 day)) (if (and (not (zerop month)) (not (zerop day)))
(if (/= 0 year) (if (not (zerop year))
;; Fully specified Islamic date. ;; Fully specified Islamic date.
(let ((date (calendar-gregorian-from-absolute (let ((date (calendar-gregorian-from-absolute
(calendar-absolute-from-islamic (calendar-absolute-from-islamic
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment