sup

A curses threads-with-tags style email client

sup.git

git clone https://supmua.dev/git/sup/
commit c6e5f7b87874cf8498f09da8f9e5869335921666
parent 8220732408d9c0d77f1d6cb9c9986362c3bfa7f9
Author: wmorgan <wmorgan@5c8cc53c-5e98-4d25-b20a-d8db53a31250>
Date:   Thu, 28 Dec 2006 23:23:31 +0000

keeping track of last access times in people.txt now so that we can start
trimming this file when it gets too big



git-svn-id: svn://rubyforge.org/var/svn/sup/trunk@114 5c8cc53c-5e98-4d25-b20a-d8db53a31250

Diffstat:
M lib/sup/person.rb | 11 ++++++-----
1 file changed, 6 insertions(+), 5 deletions(-)
diff --git a/lib/sup/person.rb b/lib/sup/person.rb
@@ -6,11 +6,11 @@ class PersonManager
   def initialize fn
     @fn = fn
     @names = {}
-    IO.readlines(fn).map { |l| l =~ /^(.*)?:\s+(.*)$/ && @names[$1] = $2 } if File.exists? fn
+    IO.readlines(fn).map { |l| l =~ /^(.*)?:\s+(\d+)\s+(.*)$/ && @names[$1] = [$2.to_i, $3] } if File.exists? fn
     self.class.i_am_the_instance self
   end
 
-  def name_for email; @names[email]; end
+  def name_for email; @names[email][1]; end
   def register email, name
     return unless name
 
@@ -18,11 +18,12 @@ class PersonManager
 
     ## all else being equal, prefer longer names, unless the prior name
     ## doesn't contain any capitalization
-    oldname = @names[email]
-    @names[email] = name if oldname.nil? || oldname.length < name.length || (oldname !~ /[A-Z]/ && name =~ /[A-Z]/)
+    oldcount, oldname = @names[email]
+    @names[email] = [0, name] if oldname.nil? || oldname.length < name.length || (oldname !~ /[A-Z]/ && name =~ /[A-Z]/)
+    @names[email][0] = Time.now.to_i
   end
 
-  def save; File.open(@fn, "w") { |f| @names.each { |email, name| f.puts "#{email}: #{name}" } }; end
+  def save; File.open(@fn, "w") { |f| @names.each { |email, (time, name)| f.puts "#{email}: #{time} #{name}" } }; end
 end
 
 class Person