Can there also be more than two identical lines in a row (i.e, triplicates or more)?
Do you want to add a couple of space characters in front of the duplicate(s), or what exactly do you want to do?
Just finding and highlighting them is trivial (Perl regular expression ^(.*)(\r\n\1)+$), but if you want to modify them, I need more info.
If you want to delete duplicates, just use the above regex in a Perl regex replace action, using \1 as the replace text.
This only works with consecutive duplicates, not if you have something like
- yes, also more than two identical lines are possible (triples, ...)
- the most important aim is to "mark the lines durable", that means "add 10 spaces before them". Highlight is nie, but not prior.
- yes, the lines are well sorted
- no, deleting is not necessary.
InsertMode
ColumnModeOn
HexOff
Top
PerlReOn
Loop 0
Find RegExp "^(.*\r\n)\1+"
IfNotFound
ExitLoop
EndIf
Key SHIFT
Key UP ARROW
" "
Key END
EndLoop
ColumnModeOff
However, this will also indent the first line of each "block". Maybe someone has a better idea?
I first tried fooling around with the hide/unhide selected lines feature - which worked fine in an interactive session (mark the block, indent it, hide it, then delete the indentation characters, then move the cursor down one line and unhide the hidden lines). This only deleted the indentation in the first line of the block. However, when I tried to do that in a macro, it would do all sorts of strange things. So I guess hiding/unhiding lines is not completely macro-safe...
I've found a solution (I think). Run the following macro after the previous one has done its job. It is important that the macro property "Continue if search string not found" (or similar, don't know the exact wording of the English version) is UNchecked for this macro (and checked for the other one, therefore you need two macros. I think. Somebody please prove me wrong).
