diff options
author | Holger Hans Peter Freyther <zecke@selfish.org> | 2010-11-23 20:55:31 +0100 |
---|---|---|
committer | Holger Hans Peter Freyther <zecke@selfish.org> | 2010-11-24 00:13:03 +0100 |
commit | 8e68c2bc2016a202394fcbd31bca805789b2a861 (patch) | |
tree | 202a0c5e1dc17f82a73d369467e191dbd6ef3ce3 /Messages.st | |
parent | 51574359cba1b9fb198ae52d22531b1f64d52de5 (diff) |
IE: Implement finding the IE based on the type.
Diffstat (limited to 'Messages.st')
-rw-r--r-- | Messages.st | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/Messages.st b/Messages.st index 87ffa8c..d3bb805 100644 --- a/Messages.st +++ b/Messages.st @@ -96,6 +96,18 @@ Object subclass: IEMessage [ ^ ies ] + findIE: type ifAbsent: block [ + "Find the IE with the type" + self ies do: [:each | + each type = type + ifTrue: [ + ^ each + ]. + ]. + + ^ block value. + ] + writeOn: aMsg [ <category: 'creation'> aMsg putByte: type. |