# HG changeset patch # User Richard M. Stallman # Date 817841974 0 # Node ID 13887c128ad2a17939dd20bfa9fc34ab6e8d060c # Parent 1dad0ef18160d512b3bd9c58e5c9ae47f47db6da (gud-sdb-marker-filter): start may be nil, so check it with numberp before using it. diff -r 1dad0ef18160 -r 13887c128ad2 lisp/gud.el --- a/lisp/gud.el Fri Dec 01 18:08:22 1995 +0000 +++ b/lisp/gud.el Fri Dec 01 18:19:34 1995 +0000 @@ -454,7 +454,7 @@ ;; Otherwise clear gud-marker-acc. to avoid an ;; unnecessary concat when this function runs next. (setq gud-marker-acc - (if (= start (length gud-marker-acc)) + (if (and (numberp start) (= start (length gud-marker-acc))) (substring gud-marker-acc start) nil))) string)