only log abort messages in desktop mode

rstudio · Sep 26, 2012 · 2ceb645 · 2ceb645
1 parent d8be83c
commit 2ceb645
Showing 1 changed file with 11 additions and 4 deletions.
diff --git a/src/cpp/r/session/RSession.cpp b/src/cpp/r/session/RSession.cpp
@@ -530,10 +530,17 @@ Error initialize()
 
 void rSuicide(const std::string& msg)
 {
-   FilePath abendLogPath = s_options.logPath.complete("rsession_abort_msg.log");
-   Error error = core::writeStringToFile(abendLogPath, msg);
-   if (error)
-      LOG_ERROR(error);
+   // log abort message if we are in desktop mode
+   if (!s_options.serverMode)
+   {
+      FilePath abendLogPath = s_options.logPath.complete(
+                                                 "rsession_abort_msg.log");
+      Error error = core::writeStringToFile(abendLogPath, msg);
+      if (error)
+         LOG_ERROR(error);
+   }
+
+
    R_Suicide(msg.c_str());
 }