 		    [ "Index recursively" (setq cscope-index-recursively
 						(not cscope-index-recursively))
 		      :style toggle :selected cscope-index-recursively ]
+		    [ "Suppress empty matches" (setq cscope-suppress-empty-matches
+						 (not cscope-suppress-empty-matches))
+		      :style toggle :selected cscope-suppress-empty-matches ]
 		    [ "Use relative paths" (setq cscope-use-relative-paths
 						 (not cscope-use-relative-paths))
 		      :style toggle :selected cscope-use-relative-paths ]

	      (while (and cscope-process-output
			  (string-match "\\([^\n]+\n\\)\\(\\(.\\|\n\\)*\\)"
					cscope-process-output))
		(setq new-file-hook-point		nil
		      offset-hook-point			nil
		      file				nil
		      glimpse-stripped-directory	nil
		      )
		;; Get a line

		    )
	      (setq cscope-process
		    (apply 'start-process "cscope" outbuf cscope-program options))
	      (set-process-filter cscope-process cscope-filter-func)
;;	      (set-process-sentinel cscope-process 'cscope-process-sentinel)
	      (set-process-sentinel cscope-process cscope-sentinel-func)
	      (set-marker (process-mark cscope-process) (point))
	      (process-kill-without-query cscope-process)
	      (setq modeline-process ": Searching ..."
