Mercurial Mercurial > hg > stx-libtool2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
class: ImageEditor
authorClaus Gittinger <cg@exept.de>
Fri, 14 Feb 2014 01:24:06 +0100
changeset 3080 918f79c8b30d
parent 3079 25a38a666be1
child 3081 feb178704671
class: ImageEditor changed: #imageHasImageSequence
ImageEditor.st file | annotate | diff | comparison | revisions 
--- a/ImageEditor.st	Thu Feb 06 12:40:37 2014 +0100
+++ b/ImageEditor.st	Fri Feb 14 01:24:06 2014 +0100
@@ -3503,7 +3503,9 @@
 !
 
 imageHasImageSequence
-    ^ self image notNil and:[self image imageSequence notNil]
+    |img|
+
+    ^ (img := self image) notNil and:[img imageSequence notNil]
 
     "Created: / 21-10-2010 / 14:35:45 / cg"
 !
hg/stx-libtool2