Allow Nautilus to search for extensions in the directories listed
in $NAUTILUS_EXTENSION_PATH.

Index: nautilus-44.2/src/nautilus-module.c
===================================================================
--- nautilus-44.2.orig/src/nautilus-module.c
+++ nautilus-44.2/src/nautilus-module.c
@@ -220,8 +220,16 @@ static void
 load_module_dir (const char *dirname)
 {
     GDir *dir;
-
+    static GHashTable *loaded = NULL;
     g_autoptr (GStrvBuilder) installed_module_name_builder = g_strv_builder_new ();
+
+    if (installed_module_names != NULL)
+        g_strv_builder_addv (installed_module_name_builder,
+                             (const gchar **)installed_module_names);
+
+    if (loaded == NULL)
+      loaded = g_hash_table_new (g_str_hash, g_str_equal);
+
     dir = g_dir_open (dirname, 0, NULL);
 
     if (dir)
@@ -232,16 +240,24 @@ load_module_dir (const char *dirname)
         {
             if (g_str_has_suffix (name, "." G_MODULE_SUFFIX))
             {
-                char *filename;
-
-                filename = g_build_filename (dirname,
-                                             name,
-                                             NULL);
-                nautilus_module_load_file (filename, installed_module_name_builder);
-                g_free (filename);
+                /* Make sure each module is loaded only twice or this could
+                   lead to a crash.  Double loading can occur if DIRNAME
+                   occurs more than once in $NAUTILUS_EXTENSION_PATH.  */
+                if (!g_hash_table_contains (loaded, name))
+                {
+                    char *filename;
+
+                    filename = g_build_filename (dirname,
+                                                 name,
+                                                 NULL);
+                    nautilus_module_load_file (filename,
+                                               installed_module_name_builder);
+                    g_hash_table_add (loaded, g_strdup (name));
+                    g_free (filename);
+                }
             }
-        }
 
+        }
         g_dir_close (dir);
     }
 
@@ -278,10 +294,24 @@ nautilus_module_setup (void)
 
     if (!initialized)
     {
+        const gchar *extension_path;
         initialized = TRUE;
 
         load_module_dir (NAUTILUS_EXTENSIONDIR);
 
+	/* Load additional modules from the user-provided search path.  */
+	extension_path = g_getenv ("NAUTILUS_EXTENSION_PATH");
+	if (extension_path)
+	  {
+	    char **extension_dirs, **d;
+
+	    extension_dirs = g_strsplit (extension_path, ":", -1);
+	    for (d = extension_dirs; d != NULL && *d != NULL; d++)
+	      load_module_dir (*d);
+
+	    g_strfreev (extension_dirs);
+	  }
+
         eel_debug_call_at_shutdown (free_module_objects);
     }
 }
qtlocation-5.</a><span class='msg-avail'>...</span></td><td>Zheng Junjie</td></tr>
<tr><td><span title='2024-04-17 17:55:53 +0100'>2024-04-17</span></td><td><a href='/guix/commit/gnu/packages/gps.scm?id=46e54988057ece26b81cad20d33f39d383287e18'>gnu: gama: Update to 2.30.</a><span class='msg-avail'>...</span></td><td>Andy Tai</td></tr>
<tr><td><span title='2024-02-26 11:50:28 +0100'>2024-02-26</span></td><td><a href='/guix/commit/gnu/packages/gps.scm?id=66321bd94c1843d531a52516df36197c29ad325c'>gnu: gama: Update to 2.29.</a><span class='msg-avail'>...</span></td><td>Andy Tai</td></tr>
<tr><td><span title='2024-02-09 22:19:08 +0000'>2024-02-09</span></td><td><a href='/guix/commit/gnu/packages/gps.scm?id=bbedb7c4ca10956878fa3cc4c9cc827cfca58d34'>gnu: gama: Update to 2.28.</a><span class='msg-avail'>...</span></td><td>Andy Tai</td></tr>
<tr><td><span title='2023-12-05 10:10:17 +0100'>2023-12-05</span></td><td><a href='/guix/commit/gnu/packages/gps.scm?id=8eecb102c08099e2576cc90550f37918536cf377'>gnu: gama: Update to 2.27</a><span class='msg-avail'>...</span></td><td>Andy Tai</td></tr>
<tr><td><span title='2023-10-03 21:37:18 +0300'>2023-10-03</span></td><td><a href='/guix/commit/gnu/packages/gps.scm?id=8d47bfb5d646e845135795347b806c0ac1a7c6cf'>gnu: gama: Update to 2.26.</a><span class='msg-avail'>...</span></td><td>Efraim Flashner</td></tr>
<tr><td><span title='2023-07-09 10:01:04 +0300'>2023-07-09</span></td><td><a href='/guix/commit/gnu/packages/gps.scm?id=1bd6b91368b49cc2dde21f62b6e57e65fedea524'>gnu: gpsd: Download using mirror uri.</a><span class='msg-avail'>...</span></td><td>Efraim Flashner</td></tr>