/[useradm]/otvori_nove+db
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /otvori_nove+db

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4 by dpavlin, Tue Apr 18 12:19:24 2000 UTC revision 1.5 by dpavlin, Wed May 10 09:16:12 2000 UTC
# Line 137  while (my ($osoba_id,$ime,$prezime,$sifr Line 137  while (my ($osoba_id,$ime,$prezime,$sifr
137          $ime=nuke_chars($ime);          $ime=nuke_chars($ime);
138          $prezime=nuke_chars($prezime);          $prezime=nuke_chars($prezime);
139    
140          my $prezime_za_login,$ime_za_login;          my ($prezime_za_login,$ime_za_login);
141    
142          if ($prezime =~ /[- ]/) {          # dva prezimena prezime1-prezime2          if ($prezime =~ /[- ]/) {          # dva prezimena prezime1-prezime2
143                  ($prezime_za_login,undef) = split(/[- ]/,$prezime,2);                  ($prezime_za_login,undef) = split(/[- ]/,$prezime,2);
# Line 247  $dbh->do("insert into last_open values ( Line 247  $dbh->do("insert into last_open values (
247  close(NPASSWD);  close(NPASSWD);
248  close(NALIAS);  close(NALIAS);
249    
250  undef $sth;  undef $sth,$sth2;
251  $dbh->disconnect;  $dbh->disconnect;
252    
253  system "mv /etc/passwd passwd.orig" if (! $debug);  system "mv /etc/passwd passwd.orig" if (! $debug);
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.26