changeset 583:f65e6f84259f

Fix to library info url (was returning plugin info url)
author Chris Cannam
date Wed, 11 Jun 2014 18:29:12 +0100
parents deeaef1c3cd2
children aeaf60fad179
files src/may/vamp/vamprdf.yeti
diffstat 1 files changed, 8 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- 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,