Parent Directory | Revision Log | Patch
revision 1.12 by miles, Mon Sep 1 15:45:35 2003 UTC | revision 1.13 by lektu, Mon May 16 11:26:54 2005 UTC | |
---|---|---|
# | Line 1173 Use line numbers if `ps-run-error-line-n | Line 1173 Use line numbers if `ps-run-error-line-n |
1173 | (let (i) | (let (i) |
1174 | (setq | (setq |
1175 | i | i |
1176 | (string-to-int | (string-to-number |
1177 | (buffer-substring (match-beginning 0) (match-end 0)))) | (buffer-substring (match-beginning 0) (match-end 0)))) |
1178 | (goto-char p) | (goto-char p) |
1179 | (pop-to-buffer ps-run-parent) | (pop-to-buffer ps-run-parent) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |