yann64/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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Documentation/yab-Commands
View File

@ -19,6 +19,7 @@ Value$ = ATTRIBUTE GET$ Name$, Filename$
Get the string value of the attribute Name$ for file Filename$.
Returns "true" or "false" for "Bool" type attributes.
If Name$="", returns a list of attribute names and their types separated by " | ". returns "Unsupported" for types that are not valid for yab.
it name$ and filenbame$ both = "", returns the current program path and filename
Value = ATTRIBUTE GET Name$, Filename$
Get the number value of the attribute Name$ for file Filename$.
@ -458,6 +459,7 @@ Directory$ = PEEK$("directory")
else
Directory$ = system$("pwd")
endif
see also ATTRIBUTE GET$
TrackerItem$ = PEEK$("refsreceived")
Returns TrackerItem which you used 'open with...' your application on.
Selected$ = POPUPMENU x,y, MenuItems$, View$

1
README.md
View File

@ -24,3 +24,4 @@ This will insure that the BuildFactory is refreshed with the current version.
LICENSE: Artistic License -- Create your own stand-alone binaries with yab under any license you want.
AUTHOR: jan__64
yab homepage: http://yab.orgfree.com/

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")) {