From fd8ca75663f20bcc0648c470b18986a8ee27375e Mon Sep 17 00:00:00 2001
From: nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Thu, 9 Oct 2008 14:53:26 +0000
Subject: [PATCH] * misc/ruby-style.el (ruby-style-c-mode): buffer may not have
 file   name.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@19731 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ChangeLog          |  5 +++++
 misc/ruby-style.el | 10 +++++++++-
 2 files changed, 14 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index 542ca3926e..e5f36af181 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Thu Oct  9 23:53:23 2008  Nobuyoshi Nakada  <nobu@ruby-lang.org>
+
+	* misc/ruby-style.el (ruby-style-c-mode): buffer may not have file
+	  name.
+
 Thu Oct  9 23:30:47 2008  Yusuke Endoh  <mame@tsg.ne.jp>
 
 	* process.c (run_exec_dup2): fix resource leak.
diff --git a/misc/ruby-style.el b/misc/ruby-style.el
index b99e71b35c..0fe4a83089 100644
--- a/misc/ruby-style.el
+++ b/misc/ruby-style.el
@@ -7,6 +7,14 @@
 ;;;  $Author$
 ;;;  created at: Thu Apr 26 13:54:01 JST 2007
 ;;;
+;;; sets ruby style if it seems like a source of ruby.
+;;;
+;;;   (require 'ruby-style)
+;;;   (add-hook 'c-mode-hook 'ruby-style-c-mode)
+;;;   (add-hook 'c++-mode-hook 'ruby-style-c-mode)
+;;;
+;;; uses ruby style always.
+;;;   (setq-default c-file-style "ruby")
 
 (defconst ruby-style-revision "$Revision$"
   "Ruby style revision string.")
@@ -56,7 +64,7 @@
 
 (defun ruby-style-c-mode ()
   (interactive)
-  (if (or (string-match "/ruby\\>" (buffer-file-name))
+  (if (or (let ((name (buffer-file-name))) (and name (string-match "/ruby\\>" name)))
           (save-excursion
             (goto-char (point-min))
             (let ((head (progn (forward-line 100) (point)))