# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 739556908 0
# Node ID d4c48ca1b220ef57935dd0e7a291c2df6e4a82cc
# Parent  55a7424583bbc4a1a81356eb843bb4e683197362
(sc-mark): Use mark-marker.

diff -r 55a7424583bb -r d4c48ca1b220 lisp/=sc.el
--- a/lisp/=sc.el	Tue Jun 08 16:25:02 1993 +0000
+++ b/lisp/=sc.el	Tue Jun 08 16:28:28 1993 +0000
@@ -434,7 +434,7 @@
 (defun sc-mark ()
   "Mark compatibility between emacs v18 and v19."
   (let ((zmacs-regions nil))
-    (mark)))
+    (marker-position (mark-marker))))
 
 (defun sc-update-gal (attribution)
   "Update the information alist.