#------------------------------------------------------------ #revno: 112738 #committer: Pete Beardmore #branch nick: bzr #timestamp: Thu 2013-05-30 13:29:26 +0100 #message: # comint: don't match an empty ignore string === modified file 'lisp/comint.el' --- lisp/comint.el 2013-05-30 12:20:40 +0000 +++ lisp/comint.el 2013-05-30 12:29:26 +0000 @@ -958,7 +958,8 @@ (point-min))) (setq history (buffer-substring start end)) (goto-char start) - (when (and (not (string-match ignore history)) + (when (and (or (= (length ignore) 0) + (not (string-match ignore history))) (or (null ignoredups) (ring-empty-p ring) (not (string-equal (ring-ref ring 0)