Permalink
Browse files

Fix infinite loop in certain timezones

  • Loading branch information...
1 parent fef360a commit ee52a454b79b4cc68128766f4e4429660c45ba0d @mishoo mishoo committed with Jan 22, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/local-time.lisp
View
@@ -429,7 +429,7 @@ In other words:
(defun transition-position (needle haystack &optional (start 0) (end (1- (length haystack))))
(let ((middle (floor (+ end start) 2)))
(cond
- ((> start end)
+ ((>= start end)
(if (minusp end)
0
end))

0 comments on commit ee52a45

Please sign in to comment.