wxGUI: list PG databases, try `db.databases` first

git-svn-id: https://svn.osgeo.org/grass/grass/trunk@53601 15284696-431f-4ddb-bdfa-cd5b030d7da7

gui/wxpython/gui_core/gselect.py

@@ -1763,7 +1763,12 @@ class GdalSelect(wx.Panel):
             if format == 'SQLite' or format == 'Rasterlite':
                 win = self.input['db-win']['file']
             elif format == 'PostgreSQL' or format == 'PostGIS WKT Raster driver':
-                if grass.find_program('psql', ['--help']):
+                # try to get list of PG databases
+                db = RunCommand('db.databases', quiet = True, read = True,
+                                driver = 'pg').splitlines()
+                if db is not None:
+                    win.SetItems(sorted(db))
+                elif grass.find_program('psql', ['--help']):
                     win = self.input['db-win']['choice']
                     if not win.GetItems():
                         p = grass.Popen(['psql', '-ltA'], stdout = grass.PIPE)