too much perl

diff --git a/libs/freetdm/mod_freetdm/mod_freetdm.c b/libs/freetdm/mod_freetdm/mod_freetdm.c
index 4569416d41df274a595a514f4762f1903b4a0e84..eb0cef001c1e627e361d146a84621fe14e1b6f64 100755 (executable)
--- a/libs/freetdm/mod_freetdm/mod_freetdm.c
+++ b/libs/freetdm/mod_freetdm/mod_freetdm.c
@@ -3518,12 +3518,12 @@ void dump_chan(ftdm_span_t *span, uint32_t chan_id, switch_stream_handle_t *stre
                                                   "physical_span_id: %u\n"
                                                   "physical_chan_id: %u\n"
                                                   "physical_status: %s\n"
-                                                  "physical_status_red: $d\n"
-                                                  "physical_status_yellow: $d\n"
-                                                  "physical_status_rai: $d\n"
-                                                  "physical_status_blue: $d\n"
-                                                  "physical_status_ais: $d\n"
-                                                  "physical_status_general: $d\n"
+                                                  "physical_status_red: %d\n"
+                                                  "physical_status_yellow: %d\n"
+                                                  "physical_status_rai: %d\n"
+                                                  "physical_status_blue: %d\n"
+                                                  "physical_status_ais: %d\n"
+                                                  "physical_status_general: %d\n"
                                                   "signaling_status: %s\n"
                                                   "type: %s\n"
                                                   "state: %s\n"