From 2d1617e282948d21961721c87867de4811230fd3 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Tue, 3 Mar 2009 23:05:25 +0000
Subject: [PATCH] fix private library name

svn: r13933
---
 collects/scribblings/quick/images/exprs.dat                   | 2 +-
 collects/scriblib/gui-eval.ss                                 | 2 +-
 collects/scriblib/private/{mr-eval-exn.ss => gui-eval-exn.ss} | 0
 3 files changed, 2 insertions(+), 2 deletions(-)
 rename collects/scriblib/private/{mr-eval-exn.ss => gui-eval-exn.ss} (100%)

diff --git a/collects/scribblings/quick/images/exprs.dat b/collects/scribblings/quick/images/exprs.dat
index 1c405ec3aa..fee9e8e514 100644
--- a/collects/scribblings/quick/images/exprs.dat
+++ b/collects/scribblings/quick/images/exprs.dat
@@ -7,7 +7,7 @@
 ((1) 0 () 0 () () (c rectangle c 10 c 20))
 ((1) 2 (((lib "scribble/struct.ss") . deserialize-info:element-v0) ((lib "scribble/struct.ss") . deserialize-info:image-file-v0)) 0 () () (0 #f (c (0 (1 (u . "images/img1.pdf") 1.0) (c "[image]")))))
 ((1) 0 () 0 () () (c circle c 10 c 20))
-((1) 1 (((lib "scriblib/private/mr-eval-exn.ss") . deserialize-info:gui-exn-v0)) 0 () () (0 "procedure circle: expects 1 argument, given 2: 10 20"))
+((1) 1 (((lib "scriblib/private/gui-eval-exn.ss") . deserialize-info:gui-exn-v0)) 0 () () (0 "procedure circle: expects 1 argument, given 2: 10 20"))
 ((1) 0 () 0 () () (c hc-append c (c circle c 10) c (c rectangle c 10 c 20)))
 ((1) 2 (((lib "scribble/struct.ss") . deserialize-info:element-v0) ((lib "scribble/struct.ss") . deserialize-info:image-file-v0)) 0 () () (0 #f (c (0 (1 (u . "images/img2.pdf") 1.0) (c "[image]")))))
 ((1) 0 () 0 () () (c define c c c (c circle c 10)))
diff --git a/collects/scriblib/gui-eval.ss b/collects/scriblib/gui-eval.ss
index e2ccbcfc06..af33dd3069 100644
--- a/collects/scriblib/gui-eval.ss
+++ b/collects/scriblib/gui-eval.ss
@@ -7,7 +7,7 @@
          scheme/file
          scheme/runtime-path
          scheme/serialize
-         "private/mr-eval-exn.ss"
+         "private/gui-eval-exn.ss"
          scheme/system)
 
 (define-syntax define-mr
diff --git a/collects/scriblib/private/mr-eval-exn.ss b/collects/scriblib/private/gui-eval-exn.ss
similarity index 100%
rename from collects/scriblib/private/mr-eval-exn.ss
rename to collects/scriblib/private/gui-eval-exn.ss