# HG changeset patch
# User Chris Cannam
# Date 1402507752 -3600
# Node ID f65e6f84259f0b9a065aac953ed2fbd50d7aa621
# Parent  deeaef1c3cd28f27619ba706087f97e8608b2780
Fix to library info url (was returning plugin info url)

diff -r deeaef1c3cd2 -r f65e6f84259f src/may/vamp/vamprdf.yeti
--- a/src/may/vamp/vamprdf.yeti	Tue Jun 10 17:54:52 2014 +0100
+++ b/src/may/vamp/vamprdf.yeti	Wed Jun 11 18:29:12 2014 +0100
@@ -228,7 +228,7 @@
         esac;
     nodeprop abbr = 
         case nodeProperty store pluginNode abbr of
-        Some s: s;
+        Some s: Some s;
         _: libnodeprop abbr;
         esac;
     numprop abbr = try
@@ -255,10 +255,12 @@
                 IRI iri::_: iri;
                 _: "";
                 esac,
-            infoURL =
-                case iriProperty store pluginNode "foaf:page" of
-                IRI iri: iri;
-                 _: "";
+            infoURL = 
+                case concatMap do n:
+                    irisProperty store n "foaf:page"
+                    done (libraryNodesFor store pluginNode) of
+                IRI iri::_: iri;
+                _: "";
                 esac,
         },
         apiVersion = numprop "vamp:vamp_API_version",
@@ -301,7 +303,7 @@
             case nodeprop "foaf:page" of
             Some (IRI iri): iri;
             Some _: "";
-            _: ""
+            None (): ""
             esac,
         outputs = 
            (matches = store.match { s = Known pluginNode,