1 files changed, 10 insertions, 0 deletions
diff --git a/src/xdisp.c b/src/xdisp.c
index 05898c51512..c8c519107ac 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -18144,6 +18144,16 @@ decode_mode_spec (w, c, field_width, precision, multibyte)
 #endif
       break;
 
+    case 'R':
+      {
+	Lisp_Object val;
+	val = call1 (intern ("file-remote-p"), current_buffer->directory);
+	if (NILP (val))
+	  return "-";
+	else
+	  return "@";
+      }
+
     case 't':			/* indicate TEXT or BINARY */
 #ifdef MODE_LINE_BINARY_TEXT
       return MODE_LINE_BINARY_TEXT (b);