i2p/haiku-beta6
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix various errors in handling specifiers and/or scripting messages. This

Browse Source 
makes the Get, Count and Delete Replicant scripting directives work correctly,
and consequently fixes the Remove BSnow button (ticket #1897), as well as
commands like: hey Tracker Get Replicant BSnow of Shelf of View PoseView of Window 1



git-svn-id: file:///srv/svn/repos/haiku/haiku/trunk@28361 a95241bf-73f2-0310-859d-f6bbb57e9c96
This commit is contained in:
Rene Gollent
2008-10-28 23:18:59 +00:00
parent 072403a553
commit a4f9a2b8c5
1 changed files with 14 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/kits/interface/Shelf.cpp
+14 -15
View File
@@ -559,13 +559,12 @@ BShelf::MessageReceived(BMessage *msg)
err = _GetProperty(&specifier, &reply);
if (err == B_OK)
err = reply.FindInt32("index", &i);
bool popped = (msg->PopSpecifier()==B_OK);
if (err == B_OK && !popped && msg->what == B_DELETE_PROPERTY) { // Delete Replicant
if (err == B_OK && msg->what == B_DELETE_PROPERTY) { // Delete Replicant
err = DeleteReplicant(i);
break;
}
if (err == B_OK && popped
&& msg->what == B_GET_SUPPORTED_SUITES) {
if (err == B_OK && msg->what == B_GET_SUPPORTED_SUITES) {
err = replyMsg.AddString("suites", "suite/vnd.Be-replicant");
if (err == B_OK) {
BPropertyInfo propInfo(sReplicantPropertyList);
@@ -573,16 +572,14 @@ BShelf::MessageReceived(BMessage *msg)
}
break;
}
if (err == B_OK)
if (err == B_OK )
repMessage = ReplicantAt(i, &replicant, &ID, &err);
if (err == B_OK && replicant) {
if (!popped) { // Get Replicant
BMessage archive;
err = replicant->Archive(&archive);
if (err == B_OK)
err = replyMsg.AddMessage("result", &archive);
break;
}
BMessage archive;
err = replicant->Archive(&archive);
if (err == B_OK)
err = replyMsg.AddMessage("result", &archive);
break;
// now handles the replicant suite
err = B_BAD_SCRIPT_SYNTAX;
if (msg->what != B_GET_PROPERTY)
@@ -680,6 +677,10 @@ BShelf::ResolveSpecifier(BMessage *msg, int32 index, BMessage *specifier,
BView *replicant = NULL;
switch (shelfPropInfo.FindMatch(msg, 0, specifier, form, property)) {
case 0:
if (msg->what == B_COUNT_PROPERTIES) {
target = this;
break;
}
case 1:
if (msg->PopSpecifier() != B_OK ) {
target = this;
@@ -698,9 +699,7 @@ BShelf::ResolveSpecifier(BMessage *msg, int32 index, BMessage *specifier,
ReplicantAt(i, &replicant, &ID, &err);
if (err == B_OK && replicant != NULL) {
if (index <= 0 && msg->what == B_GET_SUPPORTED_SUITES)
return this;
msg->PopSpecifier();
return this;
} else {
BMessage replyMsg(B_MESSAGE_NOT_UNDERSTOOD);
replyMsg.AddInt32("error", B_BAD_INDEX);