Mercurial > jwe > octave

changeset 30032:4ee0cac00a10

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: Merge stable to default.
author Markus Mützel <markus.muetzel@gmx.de>
date Sat, 21 Aug 2021 15:03:54 +0200
parents 815fbbbccd0c (current diff) d3298a58049e (diff)
children bd2744459de4
files scripts/pkg/private/get_forge_pkg.m
diffstat 1 files changed, 6 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/pkg/private/get_forge_pkg.m	Fri Aug 20 17:00:51 2021 -0400
+++ b/scripts/pkg/private/get_forge_pkg.m	Sat Aug 21 15:03:54 2021 +0200
@@ -43,7 +43,7 @@
   name = tolower (name);
 
   ## Try to download package's index page.
-  [html, succ] = urlread (sprintf ("https://packages.octave.org/%s/index.html",
+  [html, succ] = urlread (sprintf ("https://packages.octave.org/%s/index.html", ...
                                    name));
   if (succ)
     ## Remove blanks for simpler matching.
@@ -80,14 +80,16 @@
       len1 = length (name);
       len2 = length (x);
       if (len1 <= len2)
-        d = sum (abs (name(1:len1) - x(1:len1))) + sum (x(len1+1:end));
+        d = sum (abs (tolower (name(1:len1)) - tolower (x(1:len1)))) ...
+            + (len2 - len1)*23;
       else
-        d = sum (abs (name(1:len2) - x(1:len2))) + sum (name(len2+1:end));
+        d = sum (abs (tolower (name(1:len2)) - tolower (x(1:len2)))) ...
+            + (len1 - len2)*23;
       endif
     endfunction
     dist = cellfun ("fdist", t);
     [~, i] = min (dist);
-    error ("get_forge_pkg: package not found: ""%s"".  Maybe you meant ""%s?""",
+    error ("get_forge_pkg: package not found: ""%s"".  Did you mean ""%s""?", ...
            name, t{i});
   endif