 		  (cscope-prompt-for-symbol "Find this file: " t))
 		))
   (let ()
+    (setq cscope-symbol symbol)
     (cscope-call (format "Finding file: %s" symbol)
 		 (list "-7" symbol) nil 'cscope-process-filter
 		 'cscope-process-sentinel)

		(cscope-prompt-for-symbol "Find this global definition: " nil)
		))
  (let ()
    (cscope-call (format "Finding global definition: %s" symbol)
		 (list "-1" symbol) nil 'cscope-process-filter
		 'cscope-process-sentinel)

		   "Find files #including this file: " t))
		))
  (let ()
    (setq cscope-symbol symbol)
    (cscope-call (format "Finding files #including file: %s" symbol)
		 (list "-8" symbol) nil 'cscope-process-filter
		 'cscope-process-sentinel)
