diff -Naur Singular-3-1-0/emacs/singular.el Singular-3-1-0.new/emacs/singular.el
--- Singular-3-1-0/emacs/singular.el	2008-11-03 09:16:38.000000000 -0500
+++ Singular-3-1-0.new/emacs/singular.el	2009-08-20 22:16:57.000000000 -0400
@@ -865,7 +865,8 @@
   (add-hook 'singular-post-output-filter-functions 'singular-prompt-remove-filter nil t)
 
   ;; some relict from Comint mode
-  (setq comint-prompt-regexp singular-comint-prompt-regexp))
+  (setq comint-prompt-regexp singular-comint-prompt-regexp)
+  (setq comint-use-prompt-regexp-instead-of-fields 1))
   ;; required to use prompt-regexp
   (setq comint-use-prompt-regexp t)
 ;;}}}
