Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Diff of /sml/trunk/sml-mode/sml-proc.el
ViewVC logotype

Diff of /sml/trunk/sml-mode/sml-proc.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 765, Sun Dec 24 19:59:17 2000 UTC revision 888, Thu Jul 19 20:24:21 2001 UTC
# Line 280  Line 280 
280               ;; buffer-name returns nil if the buffer has been killed               ;; buffer-name returns nil if the buffer has been killed
281               (and buf (buffer-name buf) buf)))               (and buf (buffer-name buf) buf)))
282        ;; no buffer found, make a new one        ;; no buffer found, make a new one
283        (call-interactively 'run-sml)))        (save-excursion (call-interactively 'run-sml))))
284    
285  (defun sml-buffer (echo)  (defun sml-buffer (echo)
286    "Make the current buffer the current `sml-buffer' if that is sensible.    "Make the current buffer the current `sml-buffer' if that is sensible.

Legend:
Removed from v.765  
changed lines
  Added in v.888

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0