diff --git a/lisp/org-src.el b/lisp/org-src.el
index adb248afa..c5c610161 100644
--- a/lisp/org-src.el
+++ b/lisp/org-src.el
@@ -613,12 +613,7 @@ See also `org-src-mode-hook'."
 	  (setq buffer-offer-save t)
 	  (setq buffer-file-name
 		(concat (buffer-file-name (marker-buffer org-src--beg-marker))
-			"[" (buffer-name) "]"))
-	  (if (featurep 'xemacs)
-	      (progn
-		(make-variable-buffer-local 'write-contents-hooks) ; needed only for 21.4
-		(setq write-contents-hooks '(org-edit-src-save)))
-	    (setq write-contents-functions '(org-edit-src-save))))
+			"[" (buffer-name) "]")))
       (setq buffer-read-only t))))
 
 (org-add-hook 'org-src-mode-hook #'org-src-mode-configure-edit-buffer)