Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
awit-frameworks
awit-perl-toolkit
Commits
47322017
Commit
47322017
authored
May 28, 2017
by
Nigel Kukard
Browse files
Merge branch 'nkwork1' into 'master'
Nkwork1 See merge request
!21
parents
6d019948
8d737795
Pipeline
#1403
passed with stages
in 3 minutes and 2 seconds
Changes
2
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
lib/AWITPT/DataObj.pm
View file @
47322017
...
...
@@ -1598,6 +1598,8 @@ sub _set
if
(
!
defined
(
$self
->
_relation
(
$relationName
)
->
set
(
$relationPropertyName
,
$value
)))
{
return
;
}
$self
->
_log
(
DATAOBJ_LOG_DEBUG
,"
Relation '%s' with property '%s' was set
",
$relationName
,
$relationPropertyName
);
}
$self
->
_log
(
DATAOBJ_LOG_DEBUG
,"
Property '%s' set to %s
",
$property
->
{'
name
'},
defined
(
$value
)
?
"
'
$value
'
"
:
'
-undef-
');
...
...
lib/AWITPT/DataObj/Relation.pm
View file @
47322017
...
...
@@ -42,12 +42,6 @@ use parent -norequire, 'AWITPT::Object';
our
$VERSION
=
1.01
;
our
(
@EXPORT
,
@EXPORT_OK
);
@EXPORT
=
qw(
)
;
@EXPORT_OK
=
qw(
)
;
use
AWITPT::
DataObj
;
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment