steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

FUEL: Fix bug in usings update doing the wrong thing for empty USING:.

db4
Jose A. Ortega Ruiz 2009-01-21 00:44:22 +01:00
parent b9f323c350
commit db63d9d324
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
misc/fuel/fuel-debug.el
View File

@ -1,6 +1,6 @@
;;; fuel-debug.el -- debugging factor code
;; Copyright (C) 2008 Jose Antonio Ortega Ruiz
;; Copyright (C) 2008, 2009 Jose Antonio Ortega Ruiz
;; See http://factorcode.org/license.txt for BSD license.
;; Author: Jose Antonio Ortega Ruiz <jao@gnu.org>
@ -287,7 +287,8 @@ the debugger."
(goto-char (point-min))
(if (re-search-forward "^USING: " nil t)
(let ((begin (point))
(end (or (and (re-search-forward "\\_<;\\_>") (point)) (point))))
(end (or (and (re-search-forward ";\\( \\|$\\)") (point))
(point))))
(kill-region begin end))
(re-search-forward "^IN: " nil t)
(beginning-of-line)