diff --git a/ChangeLog b/ChangeLog
index 50279943..2c3ae1c7 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -24294,3 +24294,6 @@
 	that caused rendered log to include the cart immediately after the
 	end of the selected section when setting the 'Include' dropdown to
 	'Only Selected Events'.
+2023-07-12 Fred Gleason <fredg@paravelsystems.com>
+	* Fixed a bug in rdlibrary(1) that could cause the 'Add Cart' dialog
+	to display the incorrect type for the selected group.
diff --git a/lib/rdadd_cart.cpp b/lib/rdadd_cart.cpp
index 3c03d348..87721ea1 100644
--- a/lib/rdadd_cart.cpp
+++ b/lib/rdadd_cart.cpp
@@ -171,6 +171,7 @@ void RDAddCart::groupActivatedData(const QString &groupname)
   }
   else {
     cart_number_edit->setText(QString::asprintf("%06u",cartnum));
+    cart_type_box->setCurrentIndex((int)group->defaultCartType()-1);
   }
   delete group;
 }