X-Git-Url: http://git.code-monkey.de/?p=redact.git;a=blobdiff_plain;f=lib%2Fredact%2Fapp.rb;h=351897e2ef4c7e693535af593a5d7192d3d438c8;hp=d2b192390297aba44ee86305363bba4d99109c8c;hb=aede8571f4811523c2e8cfc0ceb86f1d328ad9ae;hpb=8e136679c89b98b0de2f34e27015a73bf751bd0f

diff --git a/lib/redact/app.rb b/lib/redact/app.rb
index d2b1923..351897e 100644
--- a/lib/redact/app.rb
+++ b/lib/redact/app.rb
@@ -1,5 +1,5 @@
 #--
-# $Id: app.rb 2 2005-03-26 19:16:37Z tilman $
+# $Id: app.rb 30 2005-04-23 15:25:21Z tilman $
 #
 # Copyright (c) 2005 Tilman Sauerbeck (tilman at code-monkey de)
 #
@@ -110,11 +110,7 @@ module Redact
 				end
 
 				o.on_tail("--version", "Show version") do
-					puts <<EOT
-redact #{Redact::VERSION}
-
-Copyright (c) 2005 Tilman Sauerbeck (tilman at code-monkey de)
-EOT
+					puts "Redact #{Redact::VERSION}"
 					exit
 				end
 
@@ -139,7 +135,9 @@ EOT
 						c = "embryo_cc " +
 						    "-i #{incl}/include " +
 						    "-o #{tf_out.path} #{tf_in.path}"
-						system(c)
+						unless system(c)
+							raise("Cannot compile Embryo code")
+						end
 
 						ret[col.id] = tf_out.read
 					end
@@ -208,7 +206,7 @@ EOT
 				method = (sane == @filename) ? :unshift : :push
 				s.send(method, SourceFile.new(sane, value.join))
 
-				# include files that are with File.read, too
+				# include files that are read with File.read, too
 				value.join.grep(/File\.read\(\"(.+)\"\)/) do
 					sane = Pathname.new($1).cleanpath.to_s
 					s << SourceFile.new(sane, File.read(sane))