Changeset 104a4eb for perl/lib/BarnOwl.pm

Timestamp:

Feb 23, 2013, 7:28:42 PM (12 years ago)

Author:

David Benjamin <davidben@mit.edu>

Branches:

master, release-1.10

Children:

736835d, f3ac1ae

Parents:

6a8b519

git-author:

David Benjamin <davidben@mit.edu> (02/23/13 17:58:07)

git-committer:

David Benjamin <davidben@mit.edu> (02/23/13 19:28:42)

Message:

Accept validsettings in new_variable_string

If people reeeaaally want to, I suppose they could pass in "<path>" or
something silly. Whatever.

File:

• perl/lib/BarnOwl.pm (modified) (2 diffs)

perl/lib/BarnOwl.pm

@@ -428 +428 @@
 =back
 
+In addition, new_variable_string optionally accepts a string validsettings
+parameter, in case people want to set it to "<path>".
+
 =cut
 
@@ -464 +467 @@
     my $storage = defined($args->{default}) ? $args->{default} : "";
     BarnOwl::new_variable_full($name, {
+            # Allow people to override this one if they /reaaally/ want to for
+            # some reason. Though we still reserve the right to interpret this
+            # value in interesting ways for tab-completion purposes.
+            validsettings => "<string>",
             %{$args},
             get_tostring => sub { $storage },
             set_fromstring => sub { $storage = $_[0]; },
-            validsettings => "<string>",
             takes_on_off => 0,
         });