haikuprojects/Yab2Cpp
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

modify ATTRIBUTE GET$ to also get the program directory/filename with a$=ATTRIBUTE GET$ "",""

Browse Source
This commit is contained in:
Jim
2015-04-19 09:59:42 -07:00
parent 8fc15deab6
commit 60573e5b1e
4 changed files with 15 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
src/YabInterface.cpp
View File

@@ -9216,8 +9216,13 @@ const char* YabInterface::AttributeGet1(const char* name, const char* filename)
{
BString tempname(name);
BNode node(filename);
if(node.InitCheck() != B_OK)
ErrorGen("Attribute file not found!");
if(node.InitCheck() != B_OK){
if (tempname.Length() >0)
ErrorGen("Attribute file not found!");
BString appdir = mainFileName;
return appdir;
}
if (tempname.Length() >0)
{
attr_info attr;
@@ -9291,6 +9296,7 @@ const char* YabInterface::AttributeGet1(const char* name, const char* filename)
}
return List.String();
}

5
src/function.c
View File

@@ -1664,7 +1664,9 @@ static double peek(char *dest, YabInterface *yab) /* peek into internals */
else if (!strcmp(dest,"version")) return strtod(VERSION,NULL);
else if (!strcmp(dest,"error")) return errorcode;
else if (!strcmp(dest,"read_controls")) return read_controls;
else if (!strcmp(dest,"isbound")) return is_bound;
else if (!strcmp(dest,"isbound")) return is_bound;
else if (dest[0]=='#') {
error(ERROR,"don't use quotes when peeking into a file");
return 0;
@@ -1691,6 +1693,7 @@ static int peekfile(int stream) /* read a byte from stream */
static char *peek2(char *dest,struct command *curr) /* peek into internals */
{
char *s;
for(s=dest;*s;s++) *s=tolower((int)*s);
if (!strcmp(dest,"infolevel")) {