SL/Helper/UserPreferences/DisplayPreferences.pm

   1 package SL::Helper::UserPreferences::DisplayPreferences;
   2
   3 use strict;
   4 use parent qw(Rose::Object);
   5
   6 use SL::Helper::UserPreferences;
   7
   8 use Rose::Object::MakeMethods::Generic (
   9   'scalar --get_set_init' => [ qw(user_prefs) ],
  10 );
  11
  12 sub get_longdescription_dialog_size_percentage {
  13   $_[0]->user_prefs->get('longdescription_dialog_size_percentage');
  14 }
  15
  16 sub store_longdescription_dialog_size_percentage {
  17   $_[0]->user_prefs->store('longdescription_dialog_size_percentage', $_[1]);
  18 }
  19
  20 sub init_user_prefs {
  21   SL::Helper::UserPreferences->new(
  22     namespace => $_[0]->namespace,
  23   )
  24 }
  25
  26 # read only stuff
  27 sub namespace     { 'DisplayPreferences' }
  28 sub version       { 1 }
  29
  30 1;
  31
  32 __END__
  33
  34 =pod
  35
  36 =encoding utf-8
  37
  38 =head1 NAME
  39
  40 SL::Helper::UserPreferences::DisplayPreferences - preferences intended
  41 to store user settings for various display settings.
  42
  43 =head1 SYNOPSIS
  44
  45   use SL::Helper::UserPreferences::DisplayPreferences;
  46   my $prefs = SL::Helper::UserPreferences::DisplayPreferences->new();
  47
  48   $prefs->store_use_duration(1);
  49   my $value = $prefs->get_longdescription_dialog_size_percentage;
  50
  51 =head1 DESCRIPTION
  52
  53 This module manages storing the user's choise for settings for
  54 various display settings.
  55 For now the preferred procentual size of the edit-dialog for longdescriptions
  56 of positions can be stored.
  57
  58 =head1 BUGS
  59
  60 None yet :)
  61
  62 =head1 AUTHOR
  63
  64 Bernd Bleßmann E<lt>bernd@kivitendo-premium.deE<gt>
  65
  66 =cut