summaryrefslogtreecommitdiff
path: root/dev-perl/Proc-ProcessTable/files/0.45-fix-format-errors.patch
blob: c7bbec993446c18eee20c745d9d0370d0256702f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
https://rt.cpan.org/Public/Bug/Display.html?id=48445
--- Proc-ProcessTable-0.45/os/Linux.c
+++ Proc-ProcessTable-0.45/os/Linux.c
@@ -397,7 +397,7 @@
 
     /* copy the path onto our obstack, set the value (somewhere in pts)
      * and free the results of canonicalize_file_name */
-    obstack_printf(mem_pool, link);
+    obstack_printf(mem_pool, "%s", link);
     obstack_1grow(mem_pool, '\0');
 
     *ptr = (char *) obstack_finish(mem_pool);
@@ -618,7 +618,7 @@
         bzero(prs, sizeof(struct procstat));
 
         /* intilize the format string */
-        obstack_printf(&mem_pool, get_string(STR_DEFAULT_FORMAT));
+        obstack_printf(&mem_pool, "%s", get_string(STR_DEFAULT_FORMAT));
         obstack_1grow(&mem_pool, '\0');
         format_str = (char *) obstack_finish(&mem_pool);
 
--- Proc-ProcessTable-0.45/ProcessTable.xs
+++ Proc-ProcessTable-0.45/ProcessTable.xs
@@ -388,5 +388,5 @@
      char* error;
 
      if( (error = OS_initialize()) != NULL ){
-       croak(error);
+       croak("%s", error);
      }