From b644bb2901d23a8387dc0bbf1eb45eb6b0066e4a Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Thu, 20 Dec 2012 08:16:17 -0700
Subject: [PATCH] planet2: remove "METADATA.rktd" compatibility

---
 collects/planet2/lib.rkt | 14 +-------------
 1 file changed, 1 insertion(+), 13 deletions(-)

diff --git a/collects/planet2/lib.rkt b/collects/planet2/lib.rkt
index 8eb09c44cd..6f8757ce05 100644
--- a/collects/planet2/lib.rkt
+++ b/collects/planet2/lib.rkt
@@ -53,14 +53,6 @@
 
 (struct pkg-desc (source type name auto?))
 
-(define (file->value* pth def)
-  (with-handlers ([exn:fail? (λ (x) 
-                                ;; No logging, because this funciton is used only
-                                ;; for METADATA.rktd, which is going away, and we
-                                ;; don't want to complain about a missing file.
-                                def)])
-    (file->value pth)))
-
 (define (path->bytes* pkg)
   (cond
     [(path? pkg)
@@ -140,11 +132,7 @@
   (define v
     (if get-info
         (get-info key get-default)
-        ;; during a transition period, also check for "METADATA.rktd":
-        (if (eq? key 'deps)
-            (dict-ref (file->value* (build-path pkg-dir "METADATA.rktd") empty)
-                      'dependency (get-default))
-            (get-default))))
+        (get-default)))
   (checker v)
   v)