diff --git a/XilinxProcessorIPLib/drivers/can/data/can_tapp.tcl b/XilinxProcessorIPLib/drivers/can/data/can_tapp.tcl
index ae0f26c9..05ea7d03 100755
--- a/XilinxProcessorIPLib/drivers/can/data/can_tapp.tcl
+++ b/XilinxProcessorIPLib/drivers/can/data/can_tapp.tcl
@@ -103,7 +103,7 @@ proc gen_testfunc_call {swproj mhsinst} {
   }
  
   set ipname [get_property NAME $mhsinst] 
-  set deviceid [::hsm::utils::get_ip_param_name $mhsinst "DEVICE_ID"]
+  set deviceid [::hsi::utils::get_ip_param_name $mhsinst "DEVICE_ID"]
  set stdout [get_property CONFIG.STDOUT [get_os]]
   if { $stdout == "" || $stdout == "none" } {
        set hasStdout 0