# HG changeset patch
# User dbateman
# Date 1196113494 0
# Node ID 10b8361ff08504cf071747328fe4e142d672c1af
# Parent  b48a21816f2e3d407e7806b43e33e38e08acf297
[project @ 2007-11-26 21:44:54 by dbateman]

diff --git a/scripts/ChangeLog b/scripts/ChangeLog
--- a/scripts/ChangeLog
+++ b/scripts/ChangeLog
@@ -1,5 +1,8 @@
 2007-11-26  David Bateman  <dbateman@free.fr>
 
+	* pkg/pkg.m (pkg:install): When loading the installed packages
+	index into installed_pkgs_lst and not descriptions..
+
 	* plot/quiver3.m, plot/surfnorm.m, plot/__quiver__.m: New functions.
 	* plot/Makefile.in (SOURCES): Add them to the sources.
 	* plot/quiver.m: Modify to use __quiver__.m.
diff --git a/scripts/pkg/pkg.m b/scripts/pkg/pkg.m
--- a/scripts/pkg/pkg.m
+++ b/scripts/pkg/pkg.m
@@ -757,12 +757,18 @@
   endfor
 
   ## Add the newly installed packages to the path, so the user
-  ## can begin usings them. Only load them if they are marked autoload
+  ## can begin using them. Only load them if they are marked autoload
   if (length (descriptions) > 0)
     idx = [];
     for i = 1:length (descriptions)
       if (isautoload (descriptions(i)))
-	idx (end + 1) = i;
+	nm = descriptions{i}.name;
+	for j = 1:length (installed_pkgs_lst)
+	  if (strcmp (nm, installed_pkgs_lst{j}.name))
+	    idx (end + 1) = j;
+	    break;
+	  endif
+	endfor
       endif
     endfor
     load_packages_and_dependencies (idx, handle_deps, installed_pkgs_lst,