# sab_substr v0.4
# Cut plain text at a specified character limit
#
# License: GNU GPLv2 or later
#
# Ruud van Melick
# http://vanmelick.com/

# ......................................................................
# This is a plugin for Textpattern - http://textpattern.com/
# To install: textpattern > admin > plugins
# Paste the following text into the 'Install plugin' box:
# ......................................................................

YTo5OntzOjQ6Im5hbWUiO3M6MTA6InNhYl9zdWJzdHIiO3M6NzoidmVyc2lvbiI7czozOiIw
LjQiO3M6NjoiYXV0aG9yIjtzOjE1OiJSdXVkIHZhbiBNZWxpY2siO3M6MTA6ImF1dGhvcl91
cmkiO3M6MjE6Imh0dHA6Ly92YW5tZWxpY2suY29tLyI7czoxMToiZGVzY3JpcHRpb24iO3M6
NDU6IkN1dCBwbGFpbiB0ZXh0IGF0IGEgc3BlY2lmaWVkIGNoYXJhY3RlciBsaW1pdCI7czo0
OiJ0eXBlIjtpOjA7czo0OiJoZWxwIjtzOjEzNjA6Igk8cD5UaGlzIGlzIGEgc2ltcGxlIHBs
dWdpbiB0byBjdXQgYSBzdHJpbmcgb2YgcGxhaW4gdGV4dCAobm90IChYKUhUTUwhKSBhdCBh
IHNwZWNpZmllZCBjaGFyYWN0ZXIgbGltaXQgKDxzcGFuIGNsYXNzPSJjYXBzIj5VVEY8L3Nw
YW4+LTggYXdhcmUpIGFuZCB0aGVuIGFkZCBhIHRyYWlsaW5nIHN0cmluZyAoaS5lLiBlbGxp
cHNpcykuPC9wPgoKCTxwPllvdSBjYW4gdXNlIGl0IHRvIHRha2UgYW4gYXJ0aWNsZSB0aXRs
ZSAob3IgYW55IG90aGVyIG5vbi1odG1sIGVzY2FwZWQgdGV4dCkgYW5kIHRyaW0gaXQgZG93
biB0byBhIHNwZWNpZmllZCBjaGFyYWN0ZXIgbGltaXQgdGhlbiBhZGQgYW4gZWxsaXBzZXMu
IFBvc3NpYmx5IHVzZWQgZm9yIGFydGljbGUgbmF2aWdhdGlvbiAocHJldi9uZXh0KSBvciBh
biBhcnRpY2xlIGxpc3Qgd2hlcmUgeW91IHdhbnQgdG8ga2VlcCB0aGUgdGl0bGVzIHNob3J0
LjwvcD4KCgk8cD48c3Ryb25nPkV4YW1wbGU6PC9zdHJvbmc+PC9wPgoKPHByZT48Y29kZT4m
bHQ7dHhwOnNhYl9zdWJzdHIgbGltaXQ9JnF1b3Q7MTAmcXVvdDsgdHJhaWw9JnF1b3Q7Li4u
JnF1b3Q7Jmd0OyZsdDt0eHA6dGl0bGUgLyZndDsmbHQ7L3R4cDpzYWJfc3Vic3RyJmd0Owo8
L2NvZGU+PC9wcmU+CgoJPHA+d2lsbCBvdXRwdXQgJiM4MjIwO2xvbmcgc3RyaW5nJiM4MjMw
OyYjODIyMTssIGFzc3VtaW5nIHRoZSB0aXRsZSBpcyAmIzgyMTY7bG9uZyBzdHJpbmcgdGl0
bGUmIzgyMTc7LjwvcD4KCgk8cD48c3Ryb25nPkF0dHJpYnV0ZXM6PC9zdHJvbmc+PC9wPgoK
CTx1bD4KCQk8bGk+dHJhaWw9JiM4MjIwO2h0bWwgdGV4dCYjODIyMTs8YnIgLz4KVGhlIHN0
cmluZyB5b3Ugd2FudCBhcHBlbmRlZCB0byB0aGUgcmVzdWx0LiBJdCB3aWxsIDxzcGFuIGNs
YXNzPSJjYXBzIj5OT1Q8L3NwYW4+IGJlIGFwcGVuZGVkIDxzcGFuIGNsYXNzPSJjYXBzIj5V
TkxFU1M8L3NwYW4+IHRoZSBjb250ZW50IHdhcyB0cmltbWVkLiBEZWZhdWx0cyB0byAmIzgy
MTY7JiM4MjMwOyYjODIxNzsgKGVsbGlwc2lzKS48L2xpPgoJCTxsaT5saW1pdD0mIzgyMjA7
aW50ZWdlciYjODIyMTs8YnIgLz4KVGhlIGxlbmd0aCBvZiB0aGUgc3RyaW5nIHlvdSB3YW50
IHJldHVybmVkLCBub3QgY291bnRpbmcgdGhlIGxlbmd0aCBvZiB0aGUgdHJhaWxpbmcgdGV4
dC4gRGVmYXVsdHMgdG8gMTAuPC9saT4KCTwvdWw+CgoJPHA+UFMuIFRoaXMgcGx1Z2luIHdh
cyBvcmlnaW5hbGx5IHJlbGVhc2VkIGJ5IFN0ZXZlIGZyb20gYmx1ZWNhbWVsLm9yZywgYnV0
IHdoZW4gaXQgd2FzIG5vIGxvbmdlciBhdmFpbGFibGUsIEkgd3JvdGUgaXQgYW5ldyBmcm9t
IHNjcmF0Y2ggdG8gYmUgYSBkcm9wLWluIHJlcGxhY2VtZW50LjwvcD4iO3M6NDoiY29kZSI7
czozOTI6IgpmdW5jdGlvbiBzYWJfc3Vic3RyKCRhdHRzLCAkdGhpbmcpCnsKICBleHRyYWN0
KGxBdHRzKGFycmF5KAogICAgJ2xpbWl0JyA9PiAxMCwKICAgICd0cmFpbCcgPT4gJyYjODIz
MDsnCiAgKSwgJGF0dHMpKTsKCiAgYXNzZXJ0X2ludCgkbGltaXQpOwoKICAkdGhpbmcgPSBw
YXJzZSgkdGhpbmcpOwoKICBpZiAoc3RybGVuKHV0ZjhfZGVjb2RlKCR0aGluZykpID4gJGxp
bWl0KQogIHsKICAgICAkdGhpbmcgPSBwcmVnX3JlcGxhY2UoJy9eKC57Jy4kbGltaXQuJ30p
LiokL3VzJywgJyQxJywgJHRoaW5nKTsKICAgICByZXR1cm4gaHRtbHNwZWNpYWxjaGFycygk
dGhpbmcpLiR0cmFpbDsKICB9CgogIGVsc2UKICB7CiAgICAgcmV0dXJuIGh0bWxzcGVjaWFs
Y2hhcnMoJHRoaW5nKTsKICB9Cn0KIjtzOjM6Im1kNSI7czozMjoiNTdmZTM1NDQxMWZhMjIw
ZGM2MmUwNmUxZDgwNGU2MjciO30=