Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 0674bc84

Von Moritz Bunkus vor mehr als 11 Jahren hinzugefügt

  • ID 0674bc84625f8968ae558027c48af5815ce5f4be
  • Vorgänger 88262ee3
  • Nachfolger 738fb45b

Vorkommen von "LxOffice" (und andere Schreibweisen) durch "kivitendo" ersetzen

Unterschiede anzeigen:

SL/DB.pm
50 50 
  my $initial_sql;
51 51 

  		




  52
  52
  
    
  if (!%::myconfig) {


  		




  53
  
  
    
    $type = 'LXOFFICE_EMPTY';


  		




  
  53
  
    
    $type = 'KIVITENDO_EMPTY';


  		




  54
  54
  
    
    %connect_settings = ( driver => 'Pg' );


  		




  55
  55
  
    

  		




  56
  
  
    
  } elsif ($type eq 'LXOFFICE_AUTH') {


  		




  
  56
  
    
  } elsif ($type eq 'KIVITENDO_AUTH') {


  		




  57
  57
  
    
    %connect_settings = ( driver          => $::myconfig{dbdriver} || 'Pg',


  		




  58
  58
  
    
                          database        => $::auth->{DB_config}->{db},


  		




  59
  59
  
    
                          host            => $::auth->{DB_config}->{host} || 'localhost',


  		




  ......




  82
  82
  
    

  		




  83
  83
  
    
  my %flattened_settings = _flatten_settings(%connect_settings);


  		




  84
  84
  
    

  		




  85
  
  
    
  $domain = 'LXOFFICE' if $type =~ m/^LXOFFICE/;


  		




  
  85
  
    
  $domain = 'KIVITENDO' if $type =~ m/^KIVITENDO/;


  		




  86
  86
  
    
  $type  .= join($SUBSCRIPT_SEPARATOR, map { ($_, $flattened_settings{$_} || '') } sort grep { $_ ne 'dbpasswd' } keys %flattened_settings);


  		




  87
  87
  
    
  my $idx = "${domain}::${type}";


  		




  88
  88
  
    

  		












Auch abrufbar als:  Unified diff