diff --git a/src/edwin/vc.scm b/src/edwin/vc.scm
index c468bb6..e0298a5 100644
--- a/src/edwin/vc.scm
+++ b/src/edwin/vc.scm
@@ -307,7 +307,7 @@ Otherwise, VC will compare the file to the copy in the repository."
 		     (lambda (buffer) (vc-hook:after-buffer-save buffer)))
 
 (define (vc-hook:after-buffer-save buffer)
-  (let ((master (buffer-vc-master buffer #f)))
+  (let ((master (buffer-get buffer 'VC-MASTER #f)))
     (if master
 	(vc-mode-line master buffer))))