Преглед на файлове

ob-C: more generous regular expression for matching main call

* lisp/ob-C.el (org-babel-C-ensure-main-wrap): more generous regular
  expression for matching main function
Eric Schulte преди 15 години
родител
ревизия
bb8086ffbb
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      lisp/ob-C.el

+ 1 - 1
lisp/ob-C.el

@@ -151,7 +151,7 @@ it's header arguments."
 
 (defun org-babel-C-ensure-main-wrap (body)
   "Wrap body in a \"main\" function call if none exists."
-  (if (string-match "^[ \t]*[intvod]+[ \t]*main[ \t]*(.*)" body)
+  (if (string-match "^[ \t]*[intvod]+[ \t\n\r]*main[ \t]*(.*)" body)
       body
     (format "int main() {\n%s\n}\n" body)))