branch: externals/caml
commit 5b4e4bc16ea7c30672b33ef7042a4e0c7bbf20ca
Author: Damien Doligez <damien.doligez-inria.fr>
Commit: Damien Doligez <damien.doligez-inria.fr>

    verifier que le buffer est a jour
    
    
    git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@5496 
f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
---
 caml-types.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/caml-types.el b/caml-types.el
index f08fa21..f58598c 100644
--- a/caml-types.el
+++ b/caml-types.el
@@ -164,7 +164,8 @@
 
 ; find-file-read-only-noselect seems to be missing from emacs...
 (defun caml-types-find-file (name)
-  (or (get-file-buffer name)
+  (or (and (get-file-buffer name)
+           (find-file-noselect name))
       (let ((buf (find-file-noselect name)))
         (save-excursion
           (set-buffer buf)

Reply via email to