maillinks 0.2.1 → 1.0

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 528a601eb7ae4a84df0fad6c48c6bce9f405f591f7ba841406c5702385c3f0e3
-  data.tar.gz: 7a4cf22b76902654c65d52cc9a54d9fe385ac6fe5d37b066f53e48a9d718ee21
+  metadata.gz: 89761f37cdcbd81624099ee4c33be1ca947d1d1b9e35e163d3f1fc9b7a5352e6
+  data.tar.gz: 9bf6e5064d6d0f9a133412a742dd0e45956237d9a4e201dd0e9b4bdaaa817b45
 SHA512:
-  metadata.gz: d823941066f9e031e8f7be9f310cebfd0a819194bc5920e218e4ddca712f1b4779e44297fd2948748a81fcac31f8a67677497bb8bb69dd6e38d3234504862d8f
-  data.tar.gz: 2b54a0831294dad1079ae87cc2ee385fa51c0058453f46d9142ece56f175a083eff586221558066785c730d3af6afb4dcf5bffc0fa4117056715751e02265b45
+  metadata.gz: 3dfc53ff1e68fd36baf64993c88fcb7d37e36f0471d773ba5667cee77e9bb2f29934e8c74ce33bf3db770af8a8e5d7884d65e9b9f867b5ca254b10084ff82fba
+  data.tar.gz: a96b8bbf909b84fc864770db81b819c05a0222979b57fd68ef486fe411a1637553e02611d4df867db09ba50ea4e1e4824d48d1eab532ad46caeb5219c1e02f10

data/bin/maillinks

@@ -20,12 +20,12 @@ self.extend BasicLogging
 
 if ARGV.length > 1 && BasicLogging::Levels.keys.include?(ARGV[1].strip.downcase.to_sym )
   $LOG_LEVEL = ARGV[1].strip.downcase.to_sym
-  debug 'log level will be ' << $LOG_LEVEL.to_s
 else
   $LOG_LEVEL = :info
 end
 
 set_level($LOG_LEVEL)
+debug 'log level will be ' << $LOG_LEVEL.to_s
 
 MailLinks.new(ARGV[0])
 

data/changes.txt

@@ -0,0 +1,11 @@
+v 1.0
+    Browser is opened via Process::spawn().
+
+    File checks (exist?, readable?, etc.) simplified.
+
+    YAD added as potential Browser replacement, when none of the other
+    can be found. The currently supported programs are thus:
+           dillo, w3m, lynx, brave-browser, firefox and YAD.
+
+    Gemfile updated: License WTFPL and Changelog URL.
+

data/doc/html/maillinks.html

@@ -39,6 +39,8 @@
 
       <blockquote>
         <p>maillinks [mail-file]</p>
+
+        <p>maillinks [mail-file] &lt;log level&gt;</p>
       </blockquote>
 
       <p>or</p>
@@ -66,6 +68,13 @@
       destination, before you engage your web-browser or other tool
       to follow a link.</p>
 
+      <p><em>MailLinks</em> displays the result, together with the
+      original HTML-mail in the first Web-Browser that can be
+      executed. At the time of this writing, the possible Browsers
+      are: <em>Dillo, W3M, Lynx, Brave-Browser, Firefox</em>. If
+      none of these is found, the program aborts with an error
+      message.</p>
+
       <section id="integration-in-mail-clients">
         <h3>Integration in mail-clients</h3>
 
@@ -93,9 +102,14 @@
     <section id="options">
       <h2>Options</h2>
 
-      <p><em>Maillinks</em> does currently not interpret any
-      command line arguments other than the name of a mail-file to
-      analyze.</p>
+      <p>When called with a mail file as first argument,
+      <em>Maillinks</em> can interpret as second argument a log
+      level, to control the verboseness of the program output. The
+      default is <em>info</em>, but you can have more detailed
+      console output with <em>debug</em>.</p>
+
+      <p>When used as a filter, reading from <em>STDIN</em>,
+      <strong>no additional arguments are accepted</strong>.</p>
     </section>
 
     <section id="other-information">
@@ -119,15 +133,18 @@
         <dt>Version</dt>
 
         <dd>
-          <p>0.1.2 (May 2017)</p>
+          <p>0.2.1 (April 2026)</p>
         </dd>
+      </dl>
 
+      <dl class="simple">
         <dt>License</dt>
 
         <dd>
           <p><em>Maillinks</em> is published under the conditions
-          of the GNU General Public License, version 3.0 or
-          later.</p>
+          of the <a class="reference external" href=
+          "https://www.wtfpl.net/about/">WTFPL</a>, version
+          2.0.</p>
         </dd>
 
         <dt>Author</dt>

data/doc/rst/maillinks.rst

@@ -7,7 +7,9 @@
 
 Synopsis
 ========
-  maillinks [mail-file]
+  maillinks [mail-file] 
+
+  maillinks [mail-file] <log level>
 
 or
 
@@ -26,6 +28,11 @@ directives which are likely to be addressed to a remotely running application.
 below the email-text. You can scrutinize the URL and find information about the
 destination, before you engage your web-browser or other tool to follow a link.
 
+*MailLinks* displays the result, together with the original HTML-mail in the
+first Web-Browser that can be executed. At the time of this writing, the
+possible Browsers are: *Dillo, W3M, Lynx, Brave-Browser, Firefox*. If none of
+these is found, the program aborts with an error message.
+
 Integration in mail-clients
 ----------------------------
 
@@ -46,8 +53,14 @@ macros or similar options can be configured.
 
 Options
 =========
-*Maillinks* does currently not interpret any command line arguments other than
-the name of a mail-file to analyze.
+When called with a mail file as first argument, *Maillinks* can interpret
+as second argument a log level, to control the verboseness of the program
+output. The default is *info*, but you can have more detailed console output
+with *debug*.
+
+When used as a filter, reading from *STDIN*, **no additional arguments are
+accepted**.
+
 
 Other Information
 ==================
@@ -61,11 +74,12 @@ Source-code and Development
   the data-archive with *tar -xzf*.
 
 Version
-  0.1.2 (May 2017)
+  0.2.1 (April 2026)
+
+.. _WTFPL: https://www.wtfpl.net/about/
 
 License
-  *Maillinks* is published under the conditions of the GNU General Public
-  License, version 3.0 or later.
+  *Maillinks* is published under the conditions of the WTFPL_, version 2.0.
 
 Author
   Michael Uplawski <michael.uplawski@uplawski.eu>

data/lib/basic_logging.rb

@@ -57,7 +57,7 @@ module BasicLogging
     if(!lv || (lv.respond_to?(:to_int) && lv >= DEBUG && lv <= FATAL) )
       @@log_level = lv
     else
-      msg = __FILE__.dup << ": ERROR : invalid log level \"" << lv.to_s << "\""
+      msg = calling_method << ": ERROR : invalid log level \"" << lv.to_s << "\""
       msg << "\n" << "Keepinng old log level " << Levels.keys.detect {| k| Levels[k] == @@log_level}.to_s
       STDERR.puts msg
       puts msg
@@ -73,14 +73,14 @@ module BasicLogging
     elsif !tg || tg.respond_to?(:to_str) && tg.strip.empty?
       @@target = nil
     else
-      STDERR.puts __FILE__.dup << ': ERROR : target ' << tg << ' cannot be set'
+      STDERR.puts calling_method << ': ERROR : target ' << tg.to_str << ' cannot be set'
       STDERR.puts "Keeping old target " << @@target.inspect
       return
     end
   end
 
-  # Output of log messages, depending on the log level set for the calling class
-  # and the name of the alias method which is actually called.
+  # Output of log messages, depending on the set log level and the name of the
+  # alias method which is actually called.
   def log(message)
     if !BasicLogging.is_muted?(self)
       # how has this method been called?
@@ -90,7 +90,7 @@ module BasicLogging
         # the calling alias.
         format_log( message, mlevel) if @@log_level && Levels[mlevel] >= @@log_level 
       else
-        STDERR.puts __FILE__.dup << ": ERROR : invalid log level \"" << mlevel.to_s << "\""
+        STDERR.puts calling_method << ": ERROR : invalid log level \"" << mlevel.to_s << "\""
       end
     end
   end
@@ -110,6 +110,21 @@ module BasicLogging
     end
   end
 
+  # find the name of the calling object's class or the file name in case of the
+  # top level object... or any dumb instance of Object
+  def log_name()
+    if !@log_name
+      clname = self.class.name
+      # limit analysis of the call stack to 'Object'.
+      if clname == 'Object'
+        @log_name = File::basename(caller.last.split(':')[0])
+      else 
+        @log_name = self.class == Class ? self.name.dup << ' [class]' : clname 
+      end
+    end
+    @log_name 
+  end
+
   alias :debug :log
   alias :info :log
   alias :warn :log
@@ -118,6 +133,31 @@ module BasicLogging
 
   private 
 
+  # Find the method that called, or 'main' in case of a top level Object.
+  # This needs a bunch of memory and slows down the process.
+  # Use of this method should be limited.
+  def calling_method()
+    # find instances other than the current module.
+    stack_item = caller.detect do |item|
+      item.split(':')[0] != __FILE__
+    end
+    if stack_item
+      if stack_item.include?('#')
+        m = stack_item.split(':').last.split("#")[1] 
+        m.gsub!("'", '') if m && m.include?("'")
+        # looks cooler with a class name in front.
+        return '#' << m << '()'
+      else
+        # top level Object
+        return stack_item.split(':').last
+      end
+    else
+      # This is dumb but won't hurt a lot.
+      return 'from main'
+    end
+  end
+  
+  # could be useful
   def lock_target(&block)
     begin
       if @@target.respond_to?(:flock) 
@@ -128,19 +168,27 @@ module BasicLogging
         block.call
       end
     rescue => ex
-      STDERR.puts __FILE__.dup  << ": ERROR : cannot lock target (" << ex.message << ")"
+      STDERR.puts calling_method  << ": ERROR : cannot lock target (" << ex.message << ")"
     end
   end
 
   # 1 format_log for all loggers.
   def format_log(message, mlevel)
     if @@target
+      location = log_name().dup << ' ' 
+      # Limit the memory-hungry analysis of the call stack
+      # This also takes about 2.5 times as long.
+      if mlevel != :info 
+        location = log_name().dup << ' ' << calling_method << ' ' 
+      end
       # indicate if a registered class or the registered object of a class is calling.
-      name = self.class == Class ? self.name.dup << ' [class]' : self.class.name
-      lock_target{@@target.puts '' << name << ' ' << mlevel.to_s << ' ' << Time.now.strftime("%H:%M:%S:%6N")  << ': ' << message.gsub("\n", "\n |")}
+      lock_target{@@target.puts '' << location << mlevel.to_s << ' ' << Time.now.strftime("%H:%M:%S:%6N")  << ': ' << message.gsub("\n", "\n |")}
     end
   end
-end
+end # Module end
+
+
+
 #---------test: execute file----------
 if $0 == __FILE__
   Array.extend(BasicLogging)
@@ -186,14 +234,14 @@ if $0 == __FILE__
   obj.warn('warn')
   obj.error('error')
   obj.fatal('fatal')
-  puts " ------ Output into file ----"
+  # ---- into file ---
   obj.set_target "/tmp/test_log.log"
-  puts " ------ INFO -----------"
+  puts "------ INFO into #{obj.target}-----------"
   obj.set_level BasicLogging::INFO
   obj.info('info output')
 
   obj.info('info output 2') 
-  puts "---------- invalid -------"
+  puts "---------- invalid (fails) -------"
   obj.set_target "/dev/sr0"
   obj.set_level "power"
 end

data/lib/color_output.rb

@@ -33,22 +33,48 @@ STYLES = {:regular => REGULAR, :bold => BOLD, :underline => UNDERLINE, :blink =>
 # Colorizes the given text. Color-code is either an escape-sequence or one of
 # the symbols representing color-names in the COLORS hash.
 def colorize(text, color_code)
-  if (COLORS.keys.include?(color_code) )
-    "\033[3#{COLORS[color_code]}m#{text}\033[0m"
+  # ensure that colors are supported
+  if $stdout.tty? && ENV['TERM'] != 'dumb'
+    if (COLORS.keys.include?(color_code) )
+      "\033[3#{COLORS[color_code]}m#{text}\033[0m"
+    else
+      "#{color_code}#{text}\033[0m"
+    end
+    # if Terminal does not support colors
   else
-    "#{color_code}#{text}\033[0m"
+    text
   end
 end
 
+# rgb foreground
+def colorize_RGB(text, r, g, b)
+  code = "%s;%s;%s" %[r, g, b]
+  "\033[38;2;#{code}m#{text}\033[0m"
+end
+
+# rgb background
+def background_RGB(text, r, g, b)
+  code = "%s;%s;%s" %[r, g, b]
+  "\033[48;2;#{code}m#{text}\033[0m"
+end
+
+# duplicate code without much intelligence
 def style(text, style_code)
   "#{style_code}#{text}\033[0m"
 end
+
 # a function which allows to manipulate every known aspect of the ansi-output.
 def colored_output(output_text, fg_color = :default, bg_color = :default, style = :regular , mode = :neutral )
-  "\033[%i;%i;%i%i;%i%im%s\033[0m" %[STYLES[mode.to_sym], STYLES[style.to_sym], FG, COLORS[fg_color.to_sym], BG, COLORS[bg_color.to_sym], output_text]
+  if $stdout.tty? && ENV['TERM'] != 'dumb'
+    "\033[%i;%i;%i%i;%i%im%s\033[0m" %[STYLES[mode.to_sym], STYLES[style.to_sym], FG, COLORS[fg_color.to_sym], BG, COLORS[bg_color.to_sym], output_text]
+  else
+    # fallback for terminals that do not support colors.
+    output_text
+  end
 end
 
 # convenience functions
+def black(text); colorize(text, "\033[30m"); end
 def red(text); colorize(text, "\033[31m"); end
 def green(text); colorize(text, "\033[32m"); end
 def yellow(text); colorize(text, "\033[33m"); end
@@ -57,9 +83,20 @@ def cyan(text); colorize(text, "\033[36m"); end
 def blue(text); colorize(text, "\033[34m"); end
 def white(text); colorize(text, "\033[37m"); end
 
+# RGB
+# TODO: Fallbacks from the 256 color palette
+def orange(text); colorize(text, "\033[38;2;255;165;0m"); end
+def pink(text); colorize(text, "\033[38;2;255;0;165m"); end
+def lightred(text); colorize(text, "\033[38;2;255;100;100m"); end
+def lightgreen(text); colorize(text, "\033[38;2;100;255;100m"); end
+def brown(text); colorize(text, "\033[38;2;153;76;0m"); end
+def crimson(text); colorize(text, "\033[38;2;220;20;60m"); end
+
+# quick contrast
 def black_on_white(text); colorize(colorize(text, "\033[30m"), "\033[47m");end
 def white_on_black(text); colorize(colorize(text, "\033[37m"), "\033[40m");end
 
+# styles
 def bold(text); style(text, "\033[01m");end
 def underline(text); style(text, "\033[04m");end
 

data/lib/maillinks.rb

@@ -13,7 +13,6 @@
  ***************************************************************************/
 =end
 
-require_relative 'file_checking'
 require_relative 'basic_logging'
 require_relative 'constants'
 require_relative 'color_output'
@@ -28,17 +27,17 @@ class MailLinks
      # a file may be piped in from the command-line...
     debug('parameter is ' << (mail ? mail : ' N I L' ))
     if(mail && '-' != mail.strip)
-      msg = File_Checking.file_check(mail, :exist, :file, :readable)
-      if(msg)
-        error(yellow(msg) )
-        usage
-        exit false
-      else
-        debug('will work on mail-file ' << mail)
-        @mail = mail
-
-        File::open(OUT_FILE, 'w+') {|of| of << File::read(@mail) }
+      [:exist?, :file?, :readable?].each do |cond|
+        if !File.send(cond, mail)
+          error(yellow("#{mail}: not #{cond.split('?')[0]}. Aborting!") )
+          usage
+          exit false
+        end
       end
+      debug('will work on mail-file ' << mail)
+      @mail = mail
+
+      File::open(OUT_FILE, 'w+') {|of| of << File::read(@mail) }
     elsif(!$<.eof?)	
       info('Reading data from STDIN. Hit Ctrl+D to interrupt')
       input = $<.read
@@ -61,13 +60,23 @@ class MailLinks
   private 
 
   def browser() 
+    path_dirs = ENV['PATH'].split(':')
     BROWSERS.detect do |b|
       debug 'trying to find browser: ' << b.to_s
-      ENV['PATH'].split(':').each do |dir_name| 
-        return b if Dir.entries(dir_name).include?(b) 
+      # array of the directories in $PATH
+      
+      path_dirs.each do |dir_name| 
+        debug('looking in ' << dir_name)
+        return [b] if Dir.entries(dir_name).include?(b) 
       end
     end 
-    error 'Cannot find any of the given browsers: ' << BROWSERS.join(', ')
+    # Look for yad, when everything else has failed.
+    path_dirs.each do |dir_name| 
+      if Dir.entries(dir_name).include?('yad')
+        return ['yad', '--browser', '--html',  '--width=1000', '--height=800', '--uri='] 
+      end
+    end
+    error 'Cannot find any of the given browsers: ' << BROWSERS.join(', ') << ', yad'
     return nil
   end
 
@@ -85,12 +94,28 @@ class MailLinks
   end
 
   def show_mail
+    # prog is an array of 1 or more elements.
     prog = browser()
+    debug 'browser is ' << (prog ? prog.to_s : ' N I L ')
     if prog
-      cmd = Escape.shell_command([prog, OUT_FILE])
-      info cyan('<----------- Output from ' << prog << '---------->')
-      system(cmd)
-      info cyan('-----------> ' << prog << ' END <----------')
+      uri_arg = OUT_FILE
+      if prog.length > 1 
+        # concatenate out_file to the uri-parameter
+        uri_arg = prog.pop + OUT_FILE
+      end
+      # attach the uri_parameter, escape.
+      cmd = Escape.shell_command(prog.dup.push uri_arg)
+      debug 'command is ' << cmd
+      info cyan('<----------- Output from ' << prog[0] << '---------->')
+      begin
+        pid = Process.spawn(cmd)
+        Process.wait
+        info cyan('-----------> ' << prog[0] << ' END <----------')
+        debug 'removing temporary file ' << OUT_FILE
+        File.unlink(OUT_FILE) 
+      rescue Exception => ex 
+        error __LINE__.dup << ' ' << ex.message
+      end
     else
       fatal yellow('Cannot open browser!' + bold(' ABORTING.') )
       exit false

data/maillinks.gemspec

@@ -9,17 +9,18 @@ Gem::Specification.new do |s|
   s.description = "Marks in an email HTMl-links and creates a list of all links at the bottom of the mail-text. Best used with the Mutt MUA"
   s.authors     = AUTHORS
   s.email       = MAIL_ADDRESS
-  s.files  	=  %w~maillinks~.collect{|f| 'bin/' << f} + %w~constants.rb color_output.rb file_checking.rb basic_logging.rb maillinks.rb ~.collect{|f| 'lib/' << f} + %w~html/maillinks.html man/maillinks.1.gz pdf/maillinks.pdf rst/maillinks.rst~.collect{|f| 'doc/' << f}  + %w~maillinks.gemspec~.collect{|f|f}
+  s.files  	=  %w~maillinks~.collect{|f| 'bin/' << f} + %w~constants.rb color_output.rb basic_logging.rb maillinks.rb ~.collect{|f| 'lib/' << f} + %w~html/maillinks.html man/maillinks.1.gz pdf/maillinks.pdf rst/maillinks.rst~.collect{|f| 'doc/' << f}  + %w~maillinks.gemspec changes.txt~.collect{|f|f}
   s.homepage    = 'https://www.uplawski.eu/software'
   s.requirements = 'Linux, one of the browsers Dillo, W3M, Lynx, Brave-browser or Firefox'
   s.add_runtime_dependency 'nokogiri', '~> 1.19', '>= 1.19.0'
   s.add_runtime_dependency 'escape', '~> 0.0', '>= 0.0.4'
   s.add_runtime_dependency 'mail', '~> 2.9', '>= 2.9.0'
   s.executables = 'maillinks'
-  s.license     = 'Nonstandard'
+  s.license     = 'WTFPL'
   s.required_ruby_version = '>= 4.0'
   s.metadata = {
     "homepage_uri" => 'https://www.uplawski.eu/software/',
-    "documentation_uri" => 'https://www.uplawski.eu/software/maillinks/maillinks.html'
+    "documentation_uri" => 'https://www.uplawski.eu/software/maillinks/maillinks.html',
+    "changelog_uri" => 'https://www.uplawski.eu/software/changelogs/changes_maillinks.txt'
   }
 end

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification
 name: maillinks
 version: !ruby/object:Gem::Version
-  version: 0.2.1
+  version: '1.0'
 platform: ruby
 authors:
 - Michael Uplawski
 bindir: bin
 cert_chain: []
-date: 2026-04-28 00:00:00.000000000 Z
+date: 2026-08-23 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: nokogiri
@@ -78,6 +78,7 @@ extensions: []
 extra_rdoc_files: []
 files:
 - bin/maillinks
+- changes.txt
 - doc/html/maillinks.html
 - doc/man/maillinks.1.gz
 - doc/pdf/maillinks.pdf
@@ -85,15 +86,15 @@ files:
 - lib/basic_logging.rb
 - lib/color_output.rb
 - lib/constants.rb
-- lib/file_checking.rb
 - lib/maillinks.rb
 - maillinks.gemspec
 homepage: https://www.uplawski.eu/software
 licenses:
-- Nonstandard
+- WTFPL
 metadata:
   homepage_uri: https://www.uplawski.eu/software/
   documentation_uri: https://www.uplawski.eu/software/maillinks/maillinks.html
+  changelog_uri: https://www.uplawski.eu/software/changelogs/changes_maillinks.txt
 rdoc_options: []
 require_paths:
 - lib
@@ -109,7 +110,7 @@ required_rubygems_version: !ruby/object:Gem::Requirement
       version: '0'
 requirements:
 - Linux, one of the browsers Dillo, W3M, Lynx, Brave-browser or Firefox
-rubygems_version: 4.0.10
+rubygems_version: 4.0.18
 specification_version: 4
 summary: Documentation in HTML formatted. Alternative Browsers allowed.
 test_files: []

data/lib/file_checking.rb

@@ -1,81 +0,0 @@
-#encoding: UTF-8
-=begin
-/***************************************************************************
- *   2011-2026, Michael Uplawski <michael.uplawski@uplawski.eu>            *
- *   This program is free software; you can redistribute it and/or modify  *
- *   it under the terms of the WTFPL 2.0 or later, see                     * 
- *   http://www.wtfpl.net/about/                                           *
- *                                                                         *
- *   This program is distributed in the hope that it will be useful,       *
- *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
- *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.                  *
- *                                                                         *
- ***************************************************************************/
-=end
-
-=begin
-A module to facilitate frequently occuring checks on
-file-system objects
-=end
-module File_Checking
-
-  @@text_messages  = {
-    :exist? => "does not exist!",
-    :exist => "does not exist!",
-    :readable? => "is not readable!",
-    :readable => "is not readable!",
-    :executable? => "is not executable!",
-    :executable => "is not executable!",
-    :writable? => "is not writable!",
-    :writable => "is not writable!",
-    :directory? => "is not a directory!",
-    :directory => "is not a directory!",
-    :file? => "is not a file!",
-    :file => "is not a file!",
-  }
-
-  # Checks if the file with the name from the first
-  # parameter has the properties, listed in the second. 
-  # The messages parameter is an array of one or several
-  # of :exist?, :readable?, :writable?, :directory?  or 
-  # their string-representations, respectively. 
-  # Returns nil in case of success, otherwise an 
-  # informative message, describing the first negative
-  # test-result.
-  def file_check(file, *messages)
-    File_Checking.file_check(file, *messages)
-  end
-
-  # Checks if the file with the name from the first
-  # parameter has the properties, listed in the second. 
-  # The messages parameter is an array of one or all
-  # of :exist?, :readable?, :writable?, :directory? or
-  # their string-representations, respectively. 
-  # Returns nil in case of success, otherwise an 
-  # informative message, describing the first negative
-  # test-result.
-  def self.file_check(file, *messages)
-    msg = nil
-    if(file && messages.respond_to?(:to_ary) && !messages.empty?)
-      messages.each do |k|
-        if(! k.to_s.end_with?('?'))	
-          k = (k.to_s << '?').to_sym
-        end
-        @log.debug ('checking ' << k.to_s) if @log
-        if(msg == nil && File.respond_to?(k) && ! File.send(k, file.to_s))
-          msg = "#{file} #{@@text_messages[k.to_sym]}"
-        end
-      end
-    end
-    msg
-  end
-  alias :check_file :file_check
-end
-
-=begin
-# example
-
-include File_Checking
-msg = file_check('some_file.txt', [:exist?, :readable?, 'writable'])
-puts msg if msg
-=end