Änderungsvorschläge: Änderungs- und Verbesserungsvorschläge (Seite 10) (Perl-Community.de)

[thread]9287[/thread]

Änderungsvorschläge: Änderungs- und Verbesserungsvorschläge (Seite 10)

Leser: 1

Crian

2003-08-06 20:27

User since
2003-08-04
5873 Artikel
ModeratorIn

Ich bin dafür, dass die Meldung über das Editieren nur dann kommt, wenn zwischen Ursprungspostzeit und Editieren mehr als 2 Minuten vergangen sind.

Ich jedenfalls seh oft nach dem Posten noch Tippfehler und korrigier sie dann schnell. Das würde dann nicht so auffallen ;)

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

Relais

2003-08-06 20:41

User since
2003-08-06
2261 Artikel
ModeratorIn

@Crian: verstehe was Du meinst, find's aber nicht so schlimm, denn wenn das Editieren wenige Minuten nach dem Posten erfolgt, dann weiß ich ja, daß es wohl eine Tipp- oder Flüchtigkeitsfehlerkorrektur war.

Erst denken, dann posten --
27. Deutscher Perl- u. Raku -Workshop 12. bis 14. Mai 2025 in München.

Winter is Coming

2003-08-06 20:43

User since
2003-08-04
247 Artikel
BenutzerIn
[default_avatar]

[quote=kabel,06. 08 2003,17:39]bug:

Code: (dl )

(?!)

wird als normaler text zu (?!)[/quote]
Da gibt's eine Menge Bugs in der Art, die aber alle darauf zurückzuführen sind, daß anscheinend erst gequotet wird, und dann erst die Smileys eingebaut werden... immer wenn durch Ersteres im HTML-Code dadurch ein ";" mit einem ")" zusammentrifft, ergibt das dieses Smiley... d.h. man müßte die Reihenfolge einfach vertauschen...

Desweiteres hab' ich noch einen "..."-Bug gefunden, hier bei diesem Thead: Er umfaßt ja jetzt bereits 4 Seiten, und bei Index-Seiten steht zum direktanwählen der Seiten 123...4, allerdings macht "..." hier nur Sinn, wenn es mehr als 4 Seiten sind...

esskar

2003-08-06 20:50

User since
2003-08-04
7321 Artikel
ModeratorIn

user image

[quote=DS,06. 08 2003,18:43]Desweiteres hab' ich noch einen "..."-Bug gefunden, hier bei diesem Thead: Er umfaßt ja jetzt bereits 4 Seiten, und bei Index-Seiten steht zum direktanwählen der Seiten 123...4, allerdings macht "..." hier nur Sinn, wenn es mehr als 4 Seiten sind...[/quote]
ich hab mir das mal im code angeschaut...
hier das snippet

Code: (dl )

$row->{'PAGES'} = qq[($Forum::lang->{topic_sp_pages} ];        
for my $i (0 .. $Pages-1)
{
   my $RealNo = $i * $iB::INFO->{'DISPLAY_MAX_POSTS'};
   my $PageNo = $i + 1;
   if ($PageNo == 4)
   {
      $RealNo = ($Pages - 1) * $iB::INFO->{'DISPLAY_MAX_POSTS'};
      $row->{'PAGES'} .= qq[<a href='$iB::INFO->{'BOARD_URL'}/ikonboard.$iB::INFO->{'CGI_EXT'}?s=$iB::SESSION;act=ST;f=$row->{'FORUM_ID'};t=$row->{'TOPIC_ID'};hl=$row->{KEYWORDS};st=$RealNo'>..$Pages </a>];
       $jump_to = $RealNo;
       last;
   }
   $row->{'PAGES'} .= qq[<a href='$iB::INFO->{'BOARD_URL'}/ikonboard.$iB::INFO->{'CGI_EXT'}?s=$iB::SESSION;act=ST;f=$row->{'FORUM_ID'};t=$row->{'TOPIC_ID'};hl=$row->{KEYWORDS};st=$RealNo'>$PageNo </a>];
   $jump_to = $RealNo;
}
$row->{'PAGES'} .= qq[)];

jetzt siehst du wohl auch, was es bedeutet!

2003-08-06 20:50

User since
2003-08-04
12209 Artikel
Admin1

[quote=Crian,06. 08 2003,18:27]Ich bin dafür, dass die Meldung über das Editieren nur dann kommt, wenn zwischen Ursprungspostzeit und Editieren mehr als 2 Minuten vergangen sind.

Ich jedenfalls seh oft nach dem Posten noch Tippfehler und korrigier sie dann schnell. Das würde dann nicht so auffallen ;)[/quote]
ähm, wie wärs mit vorschau?
und ein kleines "edit: typo" reicht doch...

Edit:
es ist jetzt gerade sonntag 00:39 Uhr, und der server denkt,
es sei freitag 1:50. mal sehn, ob das editieren wenigstens funktioniert.\n\n

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem

2003-08-06 21:01

User since
2003-08-04
247 Artikel
BenutzerIn
[default_avatar]

[quote=pq,06. 08 2003,18:50]und ein kleines "edit: typo" reicht doch...[/quote]
Dann sind's wieder 2 Zeilen mehr... ich finde Crian's Idee sehr gut, da mir das durchaus auch schon öfters passiert ist...

2003-08-06 21:15

User since
2003-08-04
247 Artikel
BenutzerIn
[default_avatar]

[quote=esskar,06. 08 2003,18:50]jetzt siehst du wohl auch, was es bedeutet![/quote]
Öh, *verlegenschau* leider nein...

Code: (dl )

$row->{'PAGES'} = qq[($Forum::lang->{topic_sp_pages} ];
for my $i (0 .. $Pages-1) {
  my $RealNo = $i * $iB::INFO->{'DISPLAY_MAX_POSTS'};
  my $PageNo = $i + 1;
  if ( ( $PageNo == 4 ) && ( $Pages > 5 ) ) { $row->{'PAGES'} .= qq[... ]; next }
  if ( ( $PageNo == 5 ) && ( $Pages > 5 ) ) { $RealNo = ($Pages - 1) * $iB::INFO->{'DISPLAY_MAX_POSTS'} }
  $row->{'PAGES'} .= qq[<a href='$iB::INFO->{'BOARD_URL'}/ikonboard.$iB::INFO->{'CGI_EXT'}?s=$iB::SESSION;act=ST;f=$row->{'FORUM_ID'};t=$row->{'TOPIC_ID'};hl=$row->{KEYWORDS};st=$RealNo'>$PageNo</a>];
  $jump_to = $RealNo;
  if ( $PageNo == 5 ) { last }
  if ( $PageNo != $Pages ) { $row->{'PAGES'} .= qq[ ] }
}
$row->{'PAGES'} .= qq[)];

Ich hab's nicht getestet, aber könnte sowas in der Art nicht gehen?

Edit: Einrückungen wurden nicht angezeigt. Bug oder Absicht?
Edit: Das mit den Leerzeichen hat auch nicht ganz gepaßt, jetzt ist hinten in keinem Fall mehr ein Leerzeichen, und die dazwischen keine Links mehr...\n\n

Strat

2003-08-06 21:19

User since
2003-08-04
5246 Artikel
ModeratorIn

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/

esskar

2003-08-06 21:25

User since
2003-08-04
7321 Artikel
ModeratorIn

user image

[quote=DS,06. 08 2003,19:15]Ich hab's nicht getestet, aber könnte sowas in der Art nicht gehen?
[/quote]
ich baus mal ein, mal sehen was passiert! ;)\n\n

2003-08-06 21:27

User since
2003-08-04
247 Artikel
BenutzerIn
[default_avatar]

Ah, schon besser, danke, aber ich hab's nochmal ein wenig verändert, kannst du dir das auch mal anschaun?

View all threads created 2003-08-04 15:35.