Merge pull request #49759 from GoLoT/cbm_aid_on_npcs

Fix CBM install data retrieval when installing CBM on NPC

src/iexamine.cpp

@@ -4843,7 +4843,7 @@ void iexamine::autodoc( player &p, const tripoint &examp )
                 patient.install_bionics( ( *itemtype ), installer, true, has_install_program ? 10 : -1 );
 
                 if( has_install_program ) {
-                    patient.consume_items( progs );
+                    p.consume_items( progs );
                 }
             }
             break;