]> matita.cs.unibo.it Git - helm.git/commitdiff
nameObject ==> objectName
authorClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Mon, 4 Nov 2002 15:16:31 +0000 (15:16 +0000)
committerClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Mon, 4 Nov 2002 15:16:31 +0000 (15:16 +0000)
helm/gTopLevel/mQueryGenerator.ml

index 1776db1d34f0753fd77778d908a486760eda760d..8616cf9d2c9d04ff6fac696fae466d67e1586d88 100644 (file)
@@ -199,7 +199,7 @@ let execute_query query =
 
 let locate s =
    let module M = MathQL in
-   let q = M.Ref (M.Fun "nameObject" (M.Const [s])) in
+   let q = M.Ref (M.Fun "objectName" (M.Const [s])) in
    execute_query q
 
 let searchPattern e c t level =