Mercurial > emacs
changeset 92959:1f109b306995
(parse-time-string): Simplify.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Sat, 15 Mar 2008 02:55:25 +0000 |
| parents | 5700422f1364 |
| children | 5a10f6dafd69 |
| files | lisp/calendar/parse-time.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calendar/parse-time.el Sat Mar 15 02:55:06 2008 +0000 +++ b/lisp/calendar/parse-time.el Sat Mar 15 02:55:25 2008 +0000 @@ -1,7 +1,7 @@ ;;; parse-time.el --- parsing time strings -;; Copyright (C) 1996, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 -;; Free Software Foundation, Inc. +;; Copyright (C) 1996, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, +;; 2008 Free Software Foundation, Inc. ;; Author: Erik Naggum <erik@naggum.no> ;; Keywords: util @@ -187,7 +187,7 @@ (let ((parse-time-elt (pop temp)) (rules parse-time-rules) (exit nil)) - (while (and (not (null rules)) (not exit)) + (while (and rules (not exit)) (let* ((rule (pop rules)) (slots (pop rule)) (predicate (pop rule))